5,7 


5 


天才 で ある _| バッ ケー ジワ フト 紹介 マニ ュ ア ル 


4 | 機種 別 、 目 的 別 ソ フト ・ ハ ー ド 満載 . на 新作 ソフ ト 、 周辺 機器 開発 情報 み 
EN | |「MZ ア プリ ケー ショ ン 」Vol.5 定価 300 円 “= " MZ ニ ュー アプ リケーション ニュ ー ス 」 
ч, | お 求め は 最寄り の MZ 取扱 店 で ビ う ぞ 。 аз” @ 団 時 無料 発行 し て いま 最寄り の MZ 取扱 店 で どう ぞ 。 
2%; A Vol.5 < s= 
же. = ecl ctia 
RC ج‎ 
ыж. М-Ж кн тоз X Bub RIS вс 82881226228 M (06) 62 1-122 1 (X) 
FWL 2 `  @ お 問い 合わ せ 、 資 料 請求 は … シ ャ ー プ 帆 国 内 産 機 営業 本 部 TT 162 RHEE ETHE Л\ NERTS RENS 11 (03) 260- 1161 38) 


SHARP 


PASCAL, LOGO, MACHINE: ·· 8025 


倍 精 度 BASIC 


技術 計算 や 事務 処理 計算 に 

10 進 演算 方 式 に よる 有効 精度 16 桁 。 し か も 単に 数 値 デ ー タ が 
倍 精度 に な っ て いる だ け で な く 、 各 種 の アル ゴリ ズム 設計 、 デ ー タ 
処理 な ど そ れ ぞ れ に 高 機能 を 実現 。 同時 に 高速 処理 を 指向 し 
た 設計 で ビギナー は も ちろ ん 、 高 度 な 各種 プロ フェ ッ シ ョ ナル プロ 
グラ ミン グ も 縦横 に 駆使 で き 、 ビ ジネス に も 存 分 に 活か せま す 。 


QM2-12003(MZ-2200/20008, 7 —7/*— 737) 標準 価格 7,000 円 
Ф м2-22003(м2-2200/20008. 7^4 A2/ X— 737^) 標準 価格 12 ,000 円 


イン ター プリ タ PASCAL 
構造 化 プ ログ ラミ ング 学習 に 
カセ ッ ト テ ー プ ベー ス で 即 実 行 型 と する た め イ ンタ ー プ リタ 方 式 を 
採用 、BASIC の よう に 簡単 に 使え る PASCAL で す 。 再帰 的 記述 
や 構造 的 アレ ゴリ ズム 設計 な ど 標 準 PASCAL の 機能 は ほとん ど 
も っ て お り 、 構造 化 プ ログ ラミ ング 学習 に 最適 、 こ れ か ら PASOCAL 
を 学 ぼ うと いう 人 に ぜひ 使っ て いた だ きた い ソ フト で す 。 
Ф \№2- 1Z004(MZ-2200/2000 用 、 テ ー プ バー ジョ ン ) 標準 価格 12,000 円 


ж ,% — a る q 
マシ ン ラ ン ゲ ー ジ 
気軽 に マシ ン 語 に アタ ッ ク 
マシ ン 語 の プロ グラ ム を 入力 し た り 、 見 た り 、 動 か し た り で きる マシ ン 
語 モ ニタ プロ クラ ム 。MZ-2200/2000 に 付属 の マシ ン 語 モニ タ の 
機能 を 強化 し た 16 の コマ ンド や 簡単 な デバ ッ グ 機能 も も っ て いま 
す 。 コ ント ロー ルキ ー の 機能 も 強力 で 、 マ シン 語 サ プルー チン の 作 
り 方 な ど を 学習 中 の 人 に 最適 な 、 使 いや すい プロ グラ ム で す 。 
© м2 1Z006(MZ-2200/2000 用 、 テ ー プ バー ジョ ン ) 標準 価格 7 ,000 円 


シャ ー ブ の MZ は 、 各 種 言語 や ソフ トウ ェ ア が 自由 に 入れ 換え で きる “ ク 
リー ン , 設計 。 を その 特長 を 存 分 に 発揮 きせ る た め の シ ステ ム ソ フ ト も 各種 サ 

ー ト 、 自 由 自在 の シス テム チェ ンジ で PASCAL マ シン に も 開発 マシ ン に 
も …。 さ ら に MZ-2000 で 蓄積 され た 膨大 な 数 の アプ リケーション ソフ ト も 
その まま 使用 で きる な ど 、 優れ た 市 販 ソ フト 環境 を 誇っ て いま す , MZ- 
2200 な ら 多 和 彩 が コン ピュ ー タ の 世界 が 約束 きれ て いま すれ 


パー ソナ ルコ ンピュータ 
| / ONS 
/ | 
標準 価格 128,000 円 


く <MZ-2200 の 主 な 特長 >@ ア ドレ ス 空 間 64K パ イト 、 オ ー ル RA 
含め た シス テム コス ト パ フ ォ ー マ ンス を 徹底 し て 追求 し た 経済 
し た ハイ レベ ル な グラ フィ ッ ク 機 能 16 ビット へ の 対応 も 考 
前 面 コ ント ロー ル ( IPL ス イッ チ 、 リ セッ トス イッ チ 、 音 量 ボ リウ 


E 


還 マ シン 語 プ ログ ラム を 開発 する た め の ア プリ ケー ショ ン パ ッ ケ ー ジ 
で 、 27 種 の コマ ンド を 持つ エディ イタ / マ クロ アセ ンプ ブラ *K/C、 1200— | | J Vad C.J 
2200/20003 5, リン カ 、 22 種 の コマ ンド を も つ シ ン ポ リック 新しい 時 代 の 言語 


デバッガ 、PROM フ ォ ー マ ッ タ と いっ た 、 シ ステ ム 開 発 に は 欠か せ LOGO (n3) は 、 ア メリ カ で 開発 され 、 い ま 世 界 中 で 話題 の 新 言語 。 

な い 4 本 の テー プ か ら 成 っ て いま す 。 スク ロー ル 速 度 の 指定 、TAB 60" 曲 が っ て 5 歩 進 め …… と か 同じ 四角 を くり 返せ …… と か 複 

の 設定 ・ 解 除 な ど コ ント ロー ルキ ー の 機能 も 強化 され て いま す 。 雑 な 図形 も 人 間 の 考え る 通り に いと も 簡単 に 描く こと が で き 、 初 

@MZ-1Z005(MZ=8200/2000 用 、 テ ー プ バー ジョ ン ) 標準 価格 25 ,000 円 め て パソ コン に ふれ る 人 に と っ て 、 も っ と も ふさ わし い 言 語 だ と も 
いわ れ て いま す 。 コ ンピュータ の 知識 が な く て も 、 気 軽 に プロ グラ ム 
が 組め ます 


信 MZ-LOGO(MZ-2200/2000 用 、 テ ー プ バー ジョ ン ) 9 ,800 円 
費 日 本 ソフ トバ ンク より 発売 中 。 


フロ ッ ピ ー ロ 0 らら 

本 格 的 マシ ン 語 プ ログ ラム づく り に 

ディ スク に よる プロ グラ ム 開 発 を 容易 に する 本 格 的 ツー ル 。 Z80 の 
命令 を フル に 利用 し 、 メ モリ 効率 や スピ ー ド も アッ プ 。 さ ら に スク リー 
ン エ ディ タ Z80 マ クロ アセ ンプ ラ 、 リ ンカ 、 デバ ッ ガ 、 PROM フ ォ ー 
マッ タ を も つ 他 、 実 数 型 と 整数 型 の ふた つの BASIC コ ン パ イラ と 
いう 高 水準 ソフ ト も 付属 。 フ ァイル 操作 の コマ ンド も 豊富 、 ま た プロ 
クラ ム 開 発 に は 愉 好 の ユー ティ リティ も 数 多く 備え て いま す 。 

人 @MZ-2Z004(MZ-2200/2000 用 、 デ ィ ス ク バ ー ジ ョ ン ) 標準 価格 50 ,000 円 


より 高度 な シス テム 活用 に 
MZ-2200/2000 の カラ ー ク ラフ ィ ッ ク 漢字 コン トロ ー ル 機能 を 十 
分 に 発揮 させ 、 高速 処理 と 強力 な ファ イレ ルコ ント ロー ル を 可能 に 
し た 待望 の BASIC イ ンタ ー プ リタ で す 。 KINPUT 命令 に よる カナ 
漢字 変換 、 ま た KPRINT/PRINT を 使用 する こと に より 、 同 一 行 
に キャ ラク タ と 漢字 の 混在 印字 も 可能 。 さ ら に DELETE、RENUM 
SEARCH な ど 追 加 ・ 拡 張 コ マン ド も 豊富 で 、 よ り 使い や すく な っ て 
いま お 


る @MZ-2Z021(MZ-2200/2000 用 、 デ ィ ス ク バ ー ジ ョ ン ) 標準 価格 5,000 円 
$ ※ 漢 字 ROM ボ ポー ド MZ-1R13 が 必要 で す 。 


パー ソナ ルコ ンピュータ 


ПУЗ шш ши NZ ロロ Oz 


) М2-711------- 標準 価格 79,800 
シリ ー ズ MZ-721 …… 標 準 価格 89,800 円 
MZ-3531 標準 価格 320,000 円 (デー タレ ュー ダ 内 歳 ) 


MZ-731 …… 標準 価格 128.000 円 
(デー タレ コー ダ ・ カ ラー プ ブロッ タ プリ ンタ 内 蔵 ) 
人 @ 写 真 は MZ-731ECRT (MZ-1D05 標 準 
価格 69.800 円 ) を 組合 せ た 例 で す 。 

⑧ 画 面 は ハメ コミ 合成 写真 で す 。 


(ミニ フロ ッ ピ ー1 基 内 蔵 ) 
MZ -3541 標準 価格 410,000 円 

(ミニ フロ ッ ピ ー2 基 内 蔵 ) 
③ 写 真 は 本 体 (MZ-3541) 、 キ ー ボ ー ド 
(MZ-1K06 標準 価格 38,000 円 )、CRT 
(MZ-1D03 標準 価格 163.000 円 ) を 組 
合せ た 例 で す 。※ 画 面 は オプ ショ ン の 
グラ フィ ッ ク ボ ー ド 、 グ ラフ ィ ッ ク メ モ リ 
(x2) を 使用 し た 例 で す 。 
画面 は ハメ コミ 合成 写真 で す 。 


MZ-700 用 ディ スク BASIC 

MZ-2Z009 標準 価格 12.000 円 

* 7422 BASIC を 使用 する に は 、 拡張 ユニ ッ ト 
М2-11)03 (標準 価格 35.000 円 ) お よび ミニ フ 
ロッ ピー ディ スク ドラ イプ М2-1Е07 (標準 価格 
158,000 円 ) が 必要 て です 


p ty < 
£ 


ӨМм2-5500:/)-х асы 


増設 RAM 
MZ-1R16(!28K バ イト 
標準 価格 30.000 円 
(М2-5501 5511) 
00000000 
00000000 


16 ビ ピッ ト パ ー ソ ナル コン ピュ ー タ 
MZ-5521 (ミニ フロ ッ ピ ー2 基 内 蔵 ・256KB) 


接続 ケー ブル 
MZ-1C32 
標準 価格 6.800 円 


^ 


s 
マウ ス 
MZ-1X10 
標準 価格 19.800 円 s: 
数 値 演算 プロ セッ サ 
<? MZ-1MOS 
標準 価格 69,000 円 
Е 2237] 
Бы М2-1810 
標準 価格 30.000 円 
デー タレ コー ダ 
eR) MZ-1T03 
標準 価格 12.000 円 
一, MZ3D М2-15090 
標準 価格 41.800 円 標準 価格 10.000 円 
аа Диа Вто 
м2-1011 8 
MZ-1SO8G 
13,0008 аан, ООО 
—R — 
Meme er トラ クタ ユニ ッ ト 
E : MZ-6P01 
OMENMISBO007] — wai соор) 
136 桁 漢字 ブリ ンタ 
MZ-1P03 
=] カラー イン クジ ェ ッ ト プ リン タ 
ーー 2 MZ-1P04 
標準 価格 
228,000Ғ3 
トラ クタ ユニ ッ ト 
MZ-6P06 
標準 価格 15.000 円 
シー ト ガ イド 
М2-6Р07 
標準 価格 2.800 円 
80 桁 シリ アル プリ ンタ トラ クタ セッ ト 


MZ-1PO7 -6РОО 
標準 価格 79,800 円 BE 


標準 価格 388,000 円 J GUE PS 
UA MP ONE == 80 桁 漢字 フリ ンタ JIS 第 2 水準 г аса 
Mr pee MZ- PO ciet mo 近日 発売 


à _ a IRR MZ-1R21 
標準 価格 218.000 円 rari 3 5 近日 発売 カッ トシ ー ト フィ ー ダ 
Qo j= MZ-6P12 


RS-232C ケ ー ブ ル (バラ 線 ) 


z 13210832075 


ーー シー MZ-1C34 М2-1Р11 
ТТТ = 標準 価格 4.800 円 近日 発売 
増設 ビデ オ RAM ボ ー ド #275 
сеске 円 RS-232C ケ ー ブ ル MER 800 円 
標準 Y مح‎ > я š 
ess MZ-1C36 
標準 価格 9.000 円 本 体内 増設 用 
ーー フ ロッ ピー ディ スク ドラ イブ 
MZ-1F09 
標準 価格 70.000 円 
ミニ フロ ッ ピ ー デ ィ ス ク ド ラ イブ 
rpm —— — MZ-80BF (Mz-5501 用 ) 
MZ-1C37 
標準 価格 6.800 円 
ミニ フロ ッ ピ ー デ ィ ス ク ド ラ イブ 
Hill ses: 
接続 ケー e P ІНЕ 
MZ-4C33 58,000Ғ3 
標準 価格 6,800 円 
1MB ミ ニ フ ロ ッ ピ ビー デ ィ ス ク ド ラ イブ 
PUTES ШЖ 
RATE 
MZ-1C43 ^ 
発売 予定 
増設 RAM ボ ー ド 
MZ-1R11(256K バ イト ) 
標準 価格 80.000 円 
——— С) L9. まァ モリ (JIS 第 二 水準 ) 
辞書 ROM ボ ポー ド OO MEAS 
М2-1914 近日 発売 
r= = 標準 価格 40,000 円 
=. ^ — 
MZ-1U05 スタ ンダ ー ド フロ ッ ピ ー イ ンタ ー フ ェ イ ス スタ ンダ ー ド フロ ッ ピ ー デ ィ ス ク ド ラ イブ 
標準 価格 12.000 円 MZ-1E11 MZ-1F05 
: 近日 発売 標準 価格 398,000 円 
ハー ド デ ィ スク 
MZ-1F10 


近日 発売 


UE МАГ CBER ОЗА ЕНЕР МУ, 


@MZ-2200 シス テム 構成 図 


デー タレ コー ダ 
MZ-1T02 
標準 価格 19.800 円 


漠 字 ROM 333) 


Ек MZ-1RI3 


ユニ バー サル |/0 コ ネ ク タ 
MZ-8BCN PTR・PTP 等 
NEN 標準 価格 2.700 円 


ユニ バー サル |/O カ ー ド 


Ж-Е M 
MZ On ү 標準 価格 41.800 円 м Зао оор 
標準 価格 29.000 円 —. 。 スタティック RAM ボ ポー ド 
- мааа デム ・ テ レタ イプ 等 
[0000] — 標準 価 格 35.000 円 [ pem» (pem = 
1l BS-23202 TA RS.232C 用 ケー ブル 
注 1) — イン ター フェ イス MZ-8BC03 
PAPE Ears وحم‎ MZ-8BI03 3 標準 価 格 11.000 円 
М2-1М01 80 析 シリ アル プリ ンタ トラ クタ セッ ト 標準 価格 50.000 
標準 価格 78,000 円 а М2-6РО9 各種 
А М2-1Р07 — 
j 標準 価格 79.800 円 “та” | нин 
E. * ya p CBHB イ ンタ ー フ ェ イス Cpu 用 ケー ブル 
接続 ケー プル Т” カラ ー イ ンク ジェ ッ ン М2-8В104 М2. 
= М2-1Р04 標準 価格 45,000 円 -88С04 (mn 
rd 標準 価格 228,000 円 標準 価格 (ез) 


18,000Ғ3 RS-232C-GP-IB/R 


6.800 円 7 7—7BASIC 
=== トラ クタ ユニ ッ ト М2-12010 
808533775 М2-6РО6 標準 価格 9.500 円 
MZ-1P06 標準 価格 15.000 円 : 
" 標準 価格 234.000 円 Ë=) 
< A 136 桁 ドッ ト プ リン タ シー トカ イド 
маа 281000F3 узд 
バー EDD32PSS 標準 価格 ш 標準 価格 2.800 円 
接続 ケー ブル А 
М2-2200 
標準 価格 128.000 円 80 桁 ドッ トブ プリ ンタ 


p М2-80ВР5 
標準 価格 142.000 円 


80 桁 ドッ ト プ リ ンタ 
MZ-80P6 


ミニ フロ ッ ピ ー デ ィ ス ク ド ラ イプ 
MZ-1F07 
標準 価格 158,000 円 
(イン ター フェ イス 、 接 続 ケー プル 含む ) 


М2-8ВР5С 
標準 価格 8.600 円 


ーー 


ーー ミニ フロ ッ ピ ー 
フロ ッ ピ ー イ ンタ ー フ ェ イ ス 接続 ケー ブル ディ スク ドラ イブ 拡張 用 接続 ケー ブル 
MZ-8BFI MZ-8BFC MZ-80BF MZ-8BFKC 拡張 用 ミニ フロ ッ ピ ー デ ィ ス ク ド ライ ブ 
標準 価格 38,000 円 標準 価格 8.700 円 標準 価格 8.400 円 MZ-80BFK 
ٽڪ‎ — esu 
О; 接続 ケー ブル 
ае ン ン クル ミー フロ ッ ピー залны O シン グレ ルミ ニ フ ロッ ピー ディ スク ドラ イブ 
: MZ-80F05 MZ-80SFD 
標準 価格 3.700 円 標準 価格 158.000 円 


(合計 4 ドラ イブ まで 接続 可能 ) 


マー ク カ ー ド リー ダ 用 I/O セッ ト マー ク カ ー ド リー ダ 
MZ-80MCB 


MZ-80MCR カラ ー デ ィ ス ク BASIC 
標準 価格 30,000 円 標準 価格 198,000 円 MZ-2Z002 
標準 価格 12,000 円 
12 型 グリ ー ン ディ スプ レイ ディ スク BASIC 
MZ-1D12 :#2) MZ-2Z001 
標準 価格 32.000 円 標準 価格 10.000 円 
2 ディ スプ レイ スタ ンド 
м М2-1505 
14 型 カラ ー デ ィ ス プレ イ / 標準 価格 7.000 円 


MZ-1D15 22) 


標準 価格 72.000 円 圏 MZ-2200 シ ステ ム ソ フ トウ ェ ア 


MZ-1502 ш £ Ep 
= こさ М2-1502 
WOMEMISO00P] | イン タプ リタ パス カレ 上 
L RETE シス テム ブロ グラ ム ※ 
ім マシ ン ラ ン ゲ ー ジ ※ 
チル トス タン ド ч иг 
с=з MZ-1S08 RS-232C/GP-IB コン トロ ー ル BASIC※ 
12 型 カラ ー デ ィ ス プレ イ 標準 価格 12.000 円 ディ スク BASIC 
р М22008 22 漢字 カラ ー デ ィ ス ク BASIC 
- ama cada カラ ー デ ィ スク BASIC 
14 型 TV モニ タ 倍 精 度 ディ スク BASIC 
М2-1009 注 2) 
標準 価格 110.000 円 


ж>-7х-л 


i1) 16 ビ ピット ボ ポー ド キッ ト MZ-1M01 を 使用 する に は 専用 デー タレ コー ダ MZ-1T02( オ プシ ョ ン ) が 必要 で す 。 
注 2) MZ 専 用 ディ スプ レイ に は 、MZ-2200 と の 接続 ケー プル が 付属 し て いま す 。 
MZ-1X08 一 般 家 庭 用 カラ ーTV 3) 漢 字 カ ラー ディ スク BASIC MZ-2Z021 が 必要 で す 。 


標準 価格 13,500 円 


※ 赤 文字 は 新 製品 で す 


※ 漢 字 プ リン タ の キャラクタ は JIS 規 格 に 準じ て いま す の で 、 パソ コン 固有 の 異質 な キャ ラク タダ は 印字 で き な い も の が あり まれ 


E 


SHARP 


а САГА 
バー、 あ の スー パー イン ポ ボーズ 機 能 で 
世界 に 先駆 け て 映像 表現 に 新 領域 を 
ひら いた だ た パパ ソコ ン テ レ ビ 又 1。 ま る さ に ニュ ー 
メ テ ディア 時 代 を 迎え よう と し て いる 今 、 そ の 
アビ リティ は 一 段 と 輝き を 増し て きた よう 
で て デジ タル テロ ッッ パー (CZ-8DT・ オ 
プシ ョ ン ) を は じゅ 、 開 発 当初 か ら VTR 
や ビデ オデ イス クシ ステ ム と の イン ター フェ 
イス を 考 護 し た 先進 設計 。 ビ デオ カメ ラ 
で 撮っ た 思い 出 深 い 映 像 や 、 ビ デオ 
デス ク の 迫力 ある 映像 に 、X1 で 創っ だ 
コン ピュ ー タ 画像 を 合成 し し オリ ジ ナ ル 
映像 ファ イル を 創り 出す な ど 自在 の 映 
像 遊戯 は プロ の 領域 。8 も ちろ ん 、 パ ソ @ 左 上 の 表示 例 は 近畿 コン ピュ ー タ サナ ービス 『 実 戦 QC 管 理 」 よ り 
コン と し て の 高 性 能 も 見 逃 が せ な い 特 長 スー パー イン ポー ズ さ れ た 画像 を その まま 録画 で きる デジ タル テロ ッ パ ー。 
C5 くに グラ フィ イッ ク 機 能 や ワー ド マ ス 3 系 統 の ビデ オォ 入力 端子 を 装備 し た デジ 
| タル テロ ッッ パー を 接続 すれ ば 、 複 数 右 の ディ 
ターTM を バン ドル し た CP/ MS の 登場 スプ レイ に 映像 を 表示 し た り 、 映 像 切換 え の 
で 実務 領域 も 一 気 に 拡 大 。 い ま 超 えて る pM ао РА 
パソ コン & し て 、 フ ァ ン の 熱い 視線 を 一 身 DS も 付属 し て いま も デジ タレ テロ ッ パーCZ- зот — 89,800Ғ3 


2 
= 


に 浴び て いま も く <X1 だ か ら CP/MB も ひと 味 違 いま す >FORTRAN や COBOL な どの 高級 言語 を 使っ た 豊富 
な ソン フトウェア が 利用 で きる こと は も ちろ ん 、X1 の 特長 を その まま 活か * せ る よう に 、 フ レッ ト プラ イオ リティ 
な どの 特殊 機能 ち サ ポー ト 。 さ ら に 英 廊 ワー プロ に も な り 、 や る し く 親 し みや すい エディ イ ター に も な る ワー 
ド マ ス ターTM も バン ドル する 充実 ぶり で れ 葵 CZ-5CPM( ミ ニ フ ロ ッ ピ ー ィ スク 用 ) 標準 価格 16.800 円 
CZ-3CPM( コ ン バ ク ト フ ロッ ピー ディ スク 用 標準 価 格 16.800 円 ※CP/M は 米 デ ジタル リサ ー チ 社 の 
登録 商標 で ワー ド マ ス ター は 米 マ イク ロブ ロ 社 の 登録 商標 で す 


豊富 な X1 の ソフ ト が 共通 し て 使え る フル コン パチ プル 設計 


7 いい 7 コ フン キル ビス マグ グッ ー ス | 


く <X1 シ リー ズ の 主 な 特長 > 但 メ イン CPU に Z80A(4MHz) 、 周 辺 コ ント ロー ル 用 と し て 2 個 の サブ CPU 搭載 借 RAM: メ イン メモ リ 64K バ イト 、 テ キス ト 用 V-RAM4K 

バイ ト 、 ユ ー ザ ー 定 義 キ ャ ラク ター ゼネ レー タ 6K バ イト 、 グ ラフ ィ イッ ク 用 V-RAM48K バ イト (X1 は オプ ショ ン ) 02 7— BASIC イ ンタ プ ブリタ 装 備 倫 セ ント ロニ クス 準拠 
プリ ンタ イン ター フェ イス 、 ジ ョ イス テイ ッ ク イ ンタ ー フ ェ イ ス 、 フ ロッ ピー デイ スク イン ター フェ イス (X1D の み ) 内 蔵 豊 8 オク ター プ 3 和音 の サウ ンド ゼネ レー タ 坦 日 付 ・ 時 刻 表 示 、 

番組 子 約 が 可能 な カレ ンダ ー 付 タ イマ ー く ディ スプ レイ テレ ビ > 欠 小さ な 女 字 や 細か な 縮 模 様 も くっ きり と 再現 する 新開 発 フ ァ ィ ン ピ ッ チ プ ラウ ン 管 葵 RGB 接 続 強 子 と 
ビデ オォ 入力 ・ テ レビ 出力 端子 付 。 


高速 ・ 大 量 デー タ 処 理 を 実現 。3 イ ンチ コン パパ 
クト フロ ッ ピ ー ディ スク ドラ イプ 搭載 。 グ ラフ ィ ッ ク 
RAM 内 蔵 。14 型 中 精細 度 カ ラー ディ スプ "レイ 
テレ ピ 採 用 。 


高速 カモ ッ ト 内 蔵 、 サ プ CPU 搭 載 独立 キー ボ 
ー ド で スピ ー テ ィ な 処理 能力 。 パ ー ソ ナル コン 
ピュ ー タ に 新 領域 を ひら いた ベス ト セ ラー 機 。 


パー ソナ ルコ ンピュータ キー ボー 
CZ-800C 標準 価格 155,000 円 

14 型 カラ ー デ ティ スプ レイ テレ ビ ( マ スク ピッ チ 0.5mm ) 
CZ-800D 標準 価格 113,000 円 

@⑧X1 に は ロー ズレ ッ ド 、 メタリックシルバー、 ス ノー ホワ イト 
の 3 色 が あり ま も 


/ プ ロフ ェ ッ ショ ナル タイ プ / N 
A D 


パー ソナ ルコ ンピュータ + キ キーボード 
CZ-802C 標準 価格 198 ,000 円 
14 型 カラ ー デ ィ ス プレ イ テ レ ビ (マス クビ ピッ チ 0.4m) 
CZ-802D 標準 価格 128,000 円 
@⑧X1D に は ロー ズレ ッ ド 、 メタ リッ クシ ル パ バー の 
2 色 が あり ます も 


š Wi “PORES жн тыз tot EL EC 87223622 8 Tr(06)621-1221( ЖЖ) 
: お 問い 合わ せ 、 資 料 請求 は … 本 社内 電子 機器 事業 本 部 シス テム 機器 営業 部 
; 0000—7022 717,200 〒114 WEB DE *HE2THBI3*1752(03)893-4649 


BEULTe—ZUCLZAAN T162 東京 都 新 宿 区 市 谷 八 幡 町 8 番地 容 (03)260-1161( 大 代表 ) 


これ が スー パー イン ポー ズ だ 。 
コン ピュ ー タ 画像 と テレ ビ ・ ビ デオ 映像 を 
自在 に 重ね も あわ せる こと が で きま す 。 


машты 
іп м.а 


ыан ーー 


SHARP 


AZ 


使い や する と コ ンク ト 化 を 追 


N キー ボー ド 、CPU を 一 体 化 。 グ ラフ ィ イッ ク RAM 内 蔵 、 さ ら に カラ ー プ ロッ タプ ブリ ンタ も 装着 可能 。 


パー ソナ ルコ ンピュータ 02-8010 標準 価格 119,800 円 /14 型 カラ ー デ ィ ス プレ イ テ レ ビ (マス ク ピ ッ チ 0.45mm )CZ・ 
と жаш` 8010 標準 価格 99,800 円 
P チル トス タン ド CZ-81TR( 価格 8,500 円 )! ょ オプ ショ ン C. 写真 の ミニ フロ ッ ピ ー ディ スク ドラ イプ CZ-801FR 
(標準 価格 198,000 円 ) お よび =: ^ > 


PM は オプ ショ ン て す 。@X1C に は ロー ズレ ッ ド 、 


メタ リッ クシ ルッ マー の 2 色 カ が あり ま - 00D、801D、802D は X1 シ リー の すべ て の コン ピュ 


ー タ に 組合 せ 可 能 。※ 画 面 は ハメ 


トリ を と れる は ЕГЕ | H | 
これ っ きゃ いね エ 。| Ei 真打 登 2 " 


メ %※ ツ コン に 麻雀 ゲー р «бузы: "eo 

スピ ー ド と 、 あの 北野 英明 先生 の イラ スト レー ショ ン と で 
A 抜き ん 出 た 、Silver Ball「 イ ン テ リ 和 雀 士 ・ 四 人 麻雀 」 ほ ど 
не 真打 の 芸 を 楽し め ゆる も の は な い 、 と 自信 を も っ て 新 発 売 。 


「 ク イタ ン ・ サ キ ヅ ケア リ 」 と か ルー ル を 決め 
て 、 好 き な モ ー ド で ゲー ム が 出来 ます 。 チ ィ ・ 
ボン ・ カ ン ・ ロ ン が 可能 な 場合 は 
ゲー ム の 進行 が 止ま り 、 考 える 
間 が あり ます か ら 初 心 者 の 独習 
用 に も 使え 
ます 。 < 


知ら ぬ 間 に ウデ を あげ 、 実 戦 で 連勝 また 連勝 も 
可能 で す よ 。 

カセ ッ ト テ ー プ 版 

MZ-2000/2200 用 

パソ コン テレ ビ X 1 用 


定価 各 3 , 500 P 
買う な ら こ れ っ き ゃ な い / 


※ お 求め は お 近く の マイ コン ショ ッ プ で お 願い し ます 


ベス ト セ ラー を 続け る 面白 アメ リカ ン ゲ ー ム 好評 発売 中 通信 販売 は 一 切 や っ て いま せん 。 


жуе а 222000 k+ boy 云 フ ライ ボー イ 大 ド ー ン パトロール KPIS YF 去 バ パン パー カー ズ xax-7+— 支 レー ザー タン ク ж%4л2%з-7 ЖЕ29-2797%4 
— m3 -E 7 йы r 82 m ШЕ 


MZ-20002200 用 カセ ッ ト テ ー プ 
定価 各 2.800 円 


この ソフ ト は コン バイ ラ で か か れ て いま す 。 


製造 ・ Mig 
日 本 国内 で の お 問い 合せ は 


〒102 東京 都 千 代田 区 九段 南 2-3-14 
' ven の 靖国 九段 南 ビ ル 電話 03(263)3904 
株 


シル バー ボー ル ソフ トウ ェ ア 式 会 社 日 本 ソフ トバ ンク 本 社内 


Silver Ball( 商標 ) は 、 次 々 と 新しい ゲー ム を 


w ау es E ass ee 2 2855, Telegraph Ave. Suite 216, Berkele ~ の テー フト D f fl A CER RAT ZA eth b 
発表 ・ 発 売 し て いき ます 。 ご 期待 くだ さい 。 CA94705 U 5 A. Phone(415)848-6666 77 この テー プ よ り の 複製 及び 賃貸 行為 を 禁じ ます 。 


クリ エイ ティ プ ・ サ ビエ ンス 


EAD a Y Rig, t rm 


日 本 語 ワ ー ド プロ セッ サ Ke ) 簡易 表 計算 プロ グラ ム 

1 ツラ SU S-CALG 0 
漢字 プリ ンタ 不要 で 、 本 格 機能 22470) 表 で 、 幅 広い 用 途 

: @ 日 常 の 事務 作業 に と も な う 表 集計 が 、 だ れ で も 簡単 に で きま す 。 ブ プロ クラ 
e か な 党 字 変換 ・ ロ ー マ 字 漢字 変換 、2 つ の 入力 方 式 が 選べ ます лл s ера * * 
人 @ 採 作 は 簡単 で 、 し か も 高速 処理 だ か ら 、 ど な た で も 手軽 に 利用 で きま す ⑱2 タ イブ の 表 で 用 途 は 多彩 。 家 計 簿 、 カ ロリ ー 計 算 な どの ホー ム ユ ー ス か ら 、 
eS 在庫 管理 、 現 金 出 納 帳 な どの ビジ ネス ユー ス ま で 、 幅 広く 活用 で きま す 
上 位 機種 用 ワー プロ に 劣ら な い 多 彩 な 機能 @ 指 定 し た 計算 を 、 フ ァ ン クシ ョ ン キ ー 一 発 で 表 全 体 に 対し て 行い ます 
画 連 統 変 換 一 テー プ 版 で は 一 文字 単位 、 デ ィ ス ク 版 で は 単語 単位 で 連続 @ ソ ー ト 、 検 索 、 さ ら に は 表 の 中 に 項目 の 区 切り な し に 一 行 ま と め て デー タ 

変換 が で きま す 。 デ ィ ス ク 版 に は 16.400 語 の 単語 辞書 を 入力 する フリ ー ラ イン 入力 機能 な ど 、 充 実 し た ファ ンク ショ ン 群 

一 下線 ・ 野 線 一 カー ソル 移動 で 容易 に 下線 ・ 肝 線 が 引い た り 消 し た り 可 能 MZ-700 用 S・CALGO も あり ます 


画 印 刷 印刷 時 に 文書 全体 の レイ アウ ト が 表示 され 、 縦 書き 印刷 も 可能 
圏 そ の 他 、 外 字 ・ 熟 語 の 登録 (ディ スク 版 の み ) な ど 多彩 な 機能 満載 で す 


X-1 用 S・CALGO 3 ディ スク 版 …\19.800 テー フ 版 … Ұ9,800 
(5* デ ィ ス ク 版 ご 希望 の 方 に は 3* 版 と 交換 いた し ます 。) 


X-1 用 ・ ユ ー カ ラ JJ 
5" ディ スク 版 ・3 ディスク 版 \19.800 ユー カラ JJ 文 例 集 ーー ҰЗ.000 м2-700Я S.CALGO オ プシ ョ ン バ ッ ク ( テ ー プ 版 Y9.800) 


S・CALGO( テ ー プ 版 Ұ9,800) 
テー プ 版 \ 9,800 


У а L | 7108 東京 都 港 区 芝 5-13-18 MTC ビ ル 6F 1203-456-4615 
К 宮崎 営業 所 /〒880 宮崎 市 高千穂 通 |-6-35 住 友 生 命 ビ ル 7F 容 0985-29-|966 


Computer Technical Creation 


47732-73775 TELOS- 496-4810 


@ 当 社 ノ フト に つい て の お 問合せ は 、 
上 記 ま て お 気軽 に と うそ 


YOU НЕМЕ 


IN YOUR H 


STRATFORD COMPUTER CEN 


か な 漢字 変換 UL 行 の 桁 数 設定 
үү | в“ $ | Ll vaporis 
мава (lll lll || タブ 機能 
somaa — — —À | | " | ——— 各種 文 字 の キー 定義 
彼 線 ・ 作 表 -・ ア ンダ ー ラ イン МЕ. ЛТ 倍角 文字 出力 
コピ ー・ 転 写 - \ 1 = 要 漢字 ROM 
OMERE 
ドッ ト プ リ ンタ CZ-800P 、 漢 字 プ リン タ CZ-80PK 共 に 使用 可能 / 製 品 保証 書付 
フロ ッ ピ ー テ ディ スク 3 枚 ( シ ステ ム ・ 辞 書 ・ 文 例 集 ) + 取扱 い 説明 書 40P 
(高級 バイ ンダ ー 入 の ) 


"жа. 支 購入 を 希望 な さる 場合 は 上 記 の ブロ グラ ム 名 ・ 機 種 ・ 電 


支 当 社 ソ フト ウェ ア 総 жазаласа ааа ден ・ 氏 名 ・3 


38,0000 


(5 イン チ FD 版 ・3 イ ンチ CF 版 ) 


„яажа スト ラッ ト フ ォ ー ド ・ コ ンピュータ ー セ ンタ ター Oh!MZ 係 まで ご 注文 下さ い 。 (郵送 料 は 不要 で す 
の 上 、 資 料 請求 券 と 切手 2 20083 8 1 し て 当社 カタ ログ 係 ま で ご 請求 下さ い 
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ファ ンタ ジッ ク ・ ア ド ベ ンチ ャ ー 

胸 踊 る 数 々 の 冒険 、 を し て キュ ー ト な 野菜 の 主人 公 が 
織り な する すら い の ロ マン 。 人 気絶 頂 の 竹 ・ 中 コン ビ 
が 、 壮 大 が アド ベン チャ ー・ ス トー リー を 自信 を も っ て 


キミ に 送る 。 


適応 機種 


X-1 シ リー ズ 


FM-7 


PC-8801/MKII 
5'FD 
PC-9801/F 5'FD 


Т #4800 FD Ұ6800 


ハラ ハラ ドキ ドキ スト ー リ ー 
重い 年 真 を と り た て て 国民 を 苦し め る カボ チャ 大 王 。 
彼 に 捕 ぇ られ た 反乱 軍 の リー ダー、 ト マト 姫 。 さ て 、 
絶 体 絶命 の ピン チ の 最 中 に さっ そう と 現れ た キュ ウリ 
戦士 は トマ ト 姫 を 無事 救出 で きる ヵ 。 反乱 軍 を 勝利 
(330 59%, 


ハドソン 札幌 /〒062 札幌 市 豊平 3 条 5 丁 目 4 番 17 号 207 — К 1201 PHONE:011-821-1538 
ハドソン 仙台 /〒980 宮城 県 仙台 市 宮 町 1 丁目 4 番 28 号 PHONE:0222-65-7031 

ハドソン 金沢 /〒920 石川 県 金沢 市 本 町 2 丁目 1 番 28 号 PHONE:0762-23-1263 

ハドソン 東京 /〒102 東京 都 千代 田 区 麹町 4 丁目 7 番 5 号 麹町 ロイ ヤル ビル 2F PHONE:03-234-4996 
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内 藤 国 雄 の 詰将棋 
倉庫 番 eX-1@ ア ボロ テク ニカ @T/B 
eMZ-2000Y シ ン キ ング ・ ラ ビット @T ¥3,800 


¥ 3,400 


S-CALGO 
ФӨМ2-700Ө% 82/1 1һФТ/В 3D ゴ ルフ シミ ュ レ ーション 
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高速 ゲ - ム の 制作 


е” p т / A5 判 定価 3500 円 (〒300 円 ) 

йү)” マシ ン 語 ゲー ム の 制作 上 、 最 も 重要 な 画面 処理 。 グ ラフ ィ ッ 
" ИТІ ク ・ パ ター ン の つく り 方 ・ 表 示 ・ 移 動 等 の 基礎 か ら 、 重 ね 合わ 
Ж. せ の 処理 ・ 仮 想 VRAM と いっ た 実践 テク ニッ ク ま で 、 豊富 な 


実例 (プロ グラ ム ) を 交 じ え な が ら 平 易 に 解説 。 付 属 の カセ ッ 


“ыы Ж. ト に は 本 書 に 掲載 の パタ ー ン ・ エ ディ タ 、 ゲ ー ム 等 を 収録 。 
MZ STEP1 ノ 画面 処理 の 基礎 ・… グ ラフ ィ ッ ク VRAM 使 用 時 の 基本 事項 を 解説 


© さら に グラ フィ ッ ク ・ パ ター ン の つく り 方 、 表示 方 法 。 
Б STEP2 ノ 画面 処理 の 応用 … リ アル タイ ム ・ キ ー 入 力 に よる グラ フィ ッ ク ・ 
パタ ー ン の 移動 、 背 景 と 移動 パタ ー ン の 重ね 合わ せ の 処理 、 仮 想 VRAM と いっ 
ж た 実践 テク ニッ ク を 解説 。 
/ à ST ピラ 3 プラ ンダ ム ・ ノ ウ ハ ウ … 画 面 処理 以外 の ゲー ム づ くり に 役立つ テク 
/ | ニッ ク 、 ノ ウ ハ ウ 。 


STEP4 プ ゲー ム ・ プ ログ ラム 。 


アス キー 編 〔 人 А 
KL eon MEA SOFTWARE LIBRARY Mx 
СЕЛ Serpenon or Excme Gas Ё ーー] デイ スク ・ エ デイ タ 7-7 Mr BUN mkII 
uqa | cem tomm un 


水辺 に 顔 を 出し た カッ ちゃ ん の 前 5・8 イ ンチ の ディ スク 及び メモ 表示 画面 20 字 X10 行 漢字 数 1945 

— е に カワ イイ 少女 が 。「 人 間 に な り た リ 上 の セク タ 単 位 (256 バ イト ) ғ 入力 方 式 か な 漢字 変換 編集 機 

@ 皇 大 輸送 船 ノ スト ロモ @ オ リオ ン @ ポ リ い 」 の 一 心 で お 百度 参り を 決意 し の デー タ を 自由 に 変更 ・ 修 正 。 能 の 挿入 、 削 除 、 単 語 登 録 、 タ プ 設 定 、 

ス & ギ ャ ング @ ス ペー スエ ネ ミ ー@ パ ワー た が 参道 に は オバ ケ が ウヨ ウヨ 、 ディ スク ディ スク 、 メ モリ 上 外字 入力 プリ ンタ NEG РС-6021, 

ドナ イト @ ザ ・ ア ステ ロディ アン @ ギ ャ ラ 形 も 絶え ず 変 化す る 難所 で あっ た 。 の デー タ も ディ スク に 書き 込み 。 PC-8821/22、EPSON MP-80、RP-80 他 
クシ ー フ ァ イ ト る シャ ッ ト ・ ザ ・ ボ ックス 他 
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〒102 東京 都 千代 田 区 紀尾井 町 3- 20 鈴屋 ビル TEL. (03)265- 2461 1/3. アイ ・ エー MICRO INFORMATION ASSOCIATES 


お 待ち か ね / PC-8201 読 本 つい に 登場 / 
特徴 。 活用 て フロ グ ヌ ラム ヲ イブ ラリ / 

8201 ユ ー ザ ー に 必読 の 書 だ / 

発売 は 4 月 下旬 ぎ 定 ) а Е 


[echknow Lib 620С 
Technical Кпоу/-һоу/ апа program Library 
ІСТЕ 


第 1 部 Techknow 編 
PC-8201 を ハー ド , ソ フト 両面 
か ら 分 析 し , PC-8201 を 有効 に 使 
うた め の テ クニ カル ・ ノ ウ ハ ウ を お 
кз?» 
第 1 章 PC-8201 の 特徴 
仕様 
メモ リ 構 成 
第 2 章 N82-BASIC の 内 部 構造 
メモ リマ ッ プ 
RAM フ ァイル 


キーetc. 
第 3 章 PC-8201 の 使い 方 あれ これ 


第 2 部 プロ グラ ムラ イブ ラリ 編 

第 1 部 の ノウ ハウ を 生か し て , すぐ に 役立つ 
プロ グラ ム を 集め まし た 。 

ゲ ダーム, ユー ティ リティ, ホビ ー, 実務 な ど , 
幅広 く 使 え を ます 。 各 プロ グラ ム に は くわ し い 解 
説 が 付い て いま す の で , プロ グラ ム 技 法 に も 役 
立て て いた だ け ま す 。 


sw 74295 定価 2.500 円 


XX1 ジ リー スズ 
れ た 「SHARP HuBAS1C」 ぞ を 平易 に 解説 < ほじ め て デン «ә. 
ETT UC e k ぅ 方 か ら 、 あ ぁ る 程度 BASIC を 知っ て いる 
方 まで を xf, KIZ リ ー ズ (X1・X1C・X1D) ん か > i 
で を 実際 の 例 を 挙げ な が ら 、 少し すず つっ 確実 


単 な マ シン 語 ま 
Ae қалы ます 。 


に 理解 が 染まる k ЭМИ 


スト ラッ ト フ ォ ー ド C.C.C. X 
発行 ・ 問 合せ 先 

燃 日 本 ソフ トバ ンク 出版 部 
谷 03 (261)4095 


to egaku2 


to egakul home 

setpc 2 rt 45 

at -50 (- 50) hishigata 15 0.1 
polyspi 100 62 It 180 

end hishigata 15 0.1 


setscrunch 1 
end 


to polysp1 :side :angle 

if :side < 2 [stop] 

setpc pc * 1 

if ((remainder pc 8) = 0) Esetpc 21 


to hishigata :n :s 
if :n = 0 [stop] 


fd :side repeat 4 [fd 100 rt 903 
rt :ang|e setscrunch :s 
polyspi :side - 1 :angle hishigata :n - 1 :s * 0-5 


end end 


※ お 求め は お 近く の マイ コン ショ ッ プ で お 願い し ます 
通信 販売 は 一 切 や っ て いま せん 。 
開発 ・ 発 売 元 UNISON WORLD INCORPORATED ИШ 
2885 Telegraph Ave, Suite 216 Berkeley CA 94705 USA. 
問い 合わ せ 先 : ӨНЖУ7 К/Х/2М2 LOGOR F102 東京 都 千 代田 区 
九段 南 2 一 3 一 14 靖国 九段 南 ビ ル TEL 03-263- 3904 
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トワ ー ド 8(THE SOFTOUCH 145%- 2) 
英 か ら 味 方 に 変化 する キャ ラク タ の 設定 や スト 
ー リ ー 性 の 高い ゲー ム 運 び が 評判 で す 。 


スペ ベー スク フル ー ザ ー(THE SOF TOUCH 146 ペ ー ジ ) クロ スワ ー ド 英 単 語 (THE SOFTOUCH 147 ペ ー ジ ) 


この 流星 が また 速い ん で すね 。 よ ける だ け で も 一 苦労 。 問題 が 解け る と ご ほう びに ゲー ム で 遊べ ます 。 


HiSCORE | 
| aegg 
SCORE 

1488 | 
CRUISER 
3 
SCREEN 
1 


Ұ МОН: e town is 
— from our house. 


HiSCORE | 
— 
С SCORE | 
EET 
RUTSER | 


っ 
SCREEN 
2 
BONUS 
568 


バッ フク フ マ ン (THE SOFTOUCH 146 <- 2) 
と 上 が PCG な し の 画面 , 左下 と 下 が PCG を 使っ た 画面 
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" ішгі%е (PCGCMEMD > EBDO 


ニ メ デ イィ マー(THE SOFTOUCH I5I4— 


mm ロ ヴ の の や の 0 の の の ふ ON は GO 


ФСАМУА5Ф 


ірдіей Z 

mirror T turn 

: Беті иа? + Size E 

idefeh hrs «+, 4: color 

: full OME: home Us J,H,K:slide 


ti - 
D HDN J C) m 
мо ми) Бөз 20 % 


"n 
а ан HP 王将 (THE SOFTOUCH 150 ペ ー ジ ) 


ЕД j ds 3 
1,30) {48MAP..3 
эн) アッ <.4 

Бий" 77-3 } No(i-4) Hit RETURN TO NEXT 
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これ が プロ の テク ニッ ク / だ だ - 下 内 の 国 の ァ リ スー 


Xi 面白 テク ニッ ク 2 VTR 編集 用 ユー ティ リティ 
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長瀬 敏之 
MZ-2200/2000 マ シン 語 に 挑戦 し よう / BASIC 文 字 列 サ ー チ ツー ル 
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謎 の 円 盤 CP/M? x mesma Мой 
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Oh/ Za ト プ ロ グラ ム SCREEN Maker М2-80К/С/ 1200 PASCAL 5Р-4010 


用 テン キー MZ-80K/C パ ター ン 認 識 プロ グラ ム 


ポケ コン 横丁 実用 プロ グラ ム 「 ポ ケッ トメ モ 」 
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700 コー ザー の 熱い 期待 こじ こ だ え て 0n/1nz 2:8 5 MZ 7O00! Vf - テ ッ ク 活 用 法 
ィ 供 か ら 大 人 まで 楽し め る ザー ム な ど 豊 富 な アプリ ケー ジ コンプ ログラム を 詳し く 解 説 
者 も ベテラン も この 一 所 で の 70 の 多彩 な 機能 を 1 50% 引 き 出 せま す 


a な 5% ж 
1.284 97 ク BASIC 
プロ グラ ミン グ と デバッグ 
移植 の 考え 方 
ゲーム プロ グラ ミッ ゲ 
ビジ ネス プロ グラ ミン グ 


2 BASIC か ら マ シン 語 へ 
ッ シ ン 語 を あつ か う 法 
ディ ス ア セン プラ の 作成 と その 活用 
тя タ ア セン ブラ の 作成 と 活用 

3. マ シン 語 の 活用 と BASIC の 拡張 
マル チ ス ク リー ン / ハ ー ЕЗЕ-“ 
トレ ー サ / ボ ポー レ ー ト 変更 


4. 2 P ウエ ア に よ る パワ ー ア ッ プ 
モニ タ 作 成 プ ログ ラム 

プリ ンタ コシ ソー ルプ ログ ラム 

その 他 

。 ハー ドウ エア に よる パワ ー ア ッ プ 
ディ スク 活用 法 / ブ リン タ 活 用法 
PSG を 作る 

6. ア プリ ケー ショ ンプ ログ ラム 
日 本 語 ワ ー ド プロ セッ サ /LISP 
簡易 経理 / 集 計 表 
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遅れ て 申し わけ あり ませ ん < 


だ ん ぜん 充実 し て 
tB mn G ox CS. 


465249495 
ror ear で Hf е 


" aues, FD-70 4 
よし お つい に シャ ー プ か ら MZ-700 用 の 
フロ ッ ピ ー デ ィ ス ク が , 発売 に な っ た ね 。 
ふつ お フロッピー っ て , LOAD や SAVE 
D, すご 〈 速 いじ ん で し ょ 。 便利 に な る だ ろ 
みね 。 

わる お 700 も まだ 見 捨て られ た わけ じゃ な 
か っ た ん だ な 。 

よし お BASIC は , シャ ー プ 仕様 どけ ど , 
大 幅 に 拡張 る きれ て いる ん だ 。 なにしろ, 7 
ァイル ディ スク リプ タ が 使え る し , CHAIN 
Xb, も ちろ ん 可能 だ よ 。 

わる お そん な の 当たり まえ じゃ な いか 。 
よし お まだ まだ ある よ 。SWAP 命 令 で , 
ディ スク 上 に ある プロ グラ ム を サブ ルー チ 
ンコ ー ル で きる ん だ 。 こ の 命令 を 使 を ば と 
ん な 長い プロ グラ ム も 構造 化 可 能 ほ と いう わ 
ける 。 

ふつ お な ん だ か 次 し そう だ けど , 今 ま で 
の S-BASIC と は 全然 違っ て る の 7? 
よし お そん な こと は , な いよ 。 基 本 的 な 
命令 は ほとん ど 同 じ で , そこ に ディ スク 用 
の 命令 が 加わ っ た だ け と 思え を ば いい さる 。 た 
だ LOAD, SAVE 時に, か な ら ず ファ イル 名 
が いる と いう こと を 覚え て お か な きゃ だ め 
Eka 

わる お K/C 用 や テー プ 版 S-BASIC 上 の 
ソフ ト は , 一 体 ど うな る ん だ い 。 

よし お 心配 御 無用 。 “TRANS” っ て いう 
強力 な ファ イル 変換 用 の ユー ティ リティ ン ソ 
フト が 付い て いて ,K/C 用 DISK BASIC は 
も ちろ ん , 倍 精度 BASIC な どの 上 で 走る 
ソフ ト は , すべ て テー グ か ら も ディ スク が か 
ら も 吸い 上 げ る こと が 可能 な ん だ 。 それ か 
5, MOTH? 5. ЖА t K/CH F-DOS 
ЕО, PFE SR EFT SARC Cs 


Ө, 


わる お 
スク 以外 の 周辺 機器 の サポ ー ト は や っ て い 
る の かい 。 

よし お よく ぞ 聞 いて くれ まし だ な だ 。 デ セロ 
ッ タ プリ ンタ の コン トロ ー ル は , 当たり ま 


な か な か や る な 。 ところで, ディ 


ぇ だ けど , その うえ , 発売 予定 の シリ アル 
カー ド の サポ ー ト も 完璧 $ き 。 き ちん と シリ 
アル 用 の ファ イル を オー プン する こと が で 
き て , リ スト や デー タ を 簡単 に 送れ る ん だ 。 
デー タ し か 送れ な い 中 途 半 端 な ウフ ト と は , 
わけ が 違う よ 。 

ふつ お シリ アル カー ド っ て , 何 の こ と な 
o? 

よし お RS-232C と いう 通信 用 イン タフ ェ 
イス の カー ド の こと き 。 これ を 使え ば 他 の 
コン ピュ ー タ と 通信 で きる ん だ 。 音響 カプ 
ラ を 併用 すれ ば ,「 ウ ォ ー ゲ ー ム 」 み た だ たい に 
電話 回 線 を 通し て 遠方 の コン ピュ ー タ を ア 
クセ ス す る こと も 夢 じ ゃ な いよ 。 

わる お ウー ン / こい つ は す ざ ご いや 。 る 
す が は シャ ー プ だ な 。 早 速 注文 し よう っ と 。 
よし お 最初 は , 文句 ば っ か り 言 っ て た だく 


ドジ で ま ぬ け な マイ 


わる お と どうせ 私 は , 
ュ ン 少年 で す よ ー だ 。 
ふつ お Mihi, Oh/ MZ の 編集 室 に 
ある 700 用 フロ ッ ピ ー を 使っ て みよ う よ 。 
話 ば か り じ ゃ よく わか ん な いよ 。 

わる お そう だ そう だ 。 ぇ えー っ と, 必要 な 


DISK-700 


ふつ お 接続 の 仕方 が 複雑 びな 。 本 体 か ら 
拡張 ユニ ッ ト へ つなが っ て , それ か ら フ ロ 
ッ ピ ー へ 行く ん だ ね 。 

よし お そう を そう 。 全 部 の 装置 に 電源 を つ 
な で こと を 忘れ な いよ うに ね 。 

わる お イン タフ ェ イ スカ ー ド に IPL ロ ー 
ダー ROM を 差し 込む こと も 絶対 に 忘れ ちゃ 
だ ゆめ だ ぞ 。 

ふつ お ROM っ て 何 な の ? 

わる お ブロ グラ ム が 書き 込ん で ある 1C の 
こと き 。 こ れ が な いと DISK BASIC を ブ 
ー ト (iE: IPL-LOADO 2 E) で き な い ん 
だ 。MZ-700 の 場合 FOO0OH か ら の メモ リ 空間 
に あっ て , 電源 ON の あと ,F コ マン ド で D 
ISK BASIC が 走る ん だ (し か し MZ-1F07 
用 の イン タフ ェ イ スカ ー ド に も ROM 用 ソ ケ 
ッ ト が ある な ん て 段 き さだ な 。 わっ, オフ レ 
=m, FILS 

よし お ディ イス ケッ ト の 差し 込み 方 は ,「 親 
指 の 法則 」 で や れ ば いい ん だ 。 つ まり , ラ 


156 MEG € ө %-6 э 9 ә ш е * а X ғ 


» € а а а & e$ » 9$ À € w w $ 


ライ ブ に 差し 込ん を で くれ だ まえ 。 

ふつ お 右側 の ドラ イブ 1 に 入れ る ん だ ね 。 
早速 何 か が プ ログ ラム を 作っ て みよ ょ よう よ 。 
よし お 待っ て 待っ て 。 その 前 に マス ター 
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ディ スク の バッ クア ッ プ を と ら な いと だ め 

Ed 

わる お バッ クア ッ プ 用 の ユー ティ リティ 
も 付い て いる ん だ な 。 ぇ 一 っ と 。 
RUN*FD COPY" 

と し て 新しい ディ イス ケッ ト を も を フォー マッ ト 
し て か ら , マス ター ディ スク の コピ ー を つ 
《 れ ば いい ん だ ろ 。 


DISK BASIC の 特徴 4 


ee と まあ 何と か 3 人 は , ディ スク を 使い 
始め た よう で す 。 それ で は ここ で 私 の 独断 
と 偏見 に も と づい て ディ スク 用 に 追加 され 
た コマ ンド 類 の や さ し い 説明 を いた し まし 


ょ う ( 隠 し コマ ンド も あり ます )。 
ファ イル 名 に つい て 

700 の DISK BASIC で は , デバ イス の 指 
定 ( ど こ に SAVE,LOAD す る か と いう こと ) 
を ファ イル ディ スク リプ タ で 行い ます 。 

FD1:, ЕР22 CMTS RS TS RS 27, 
な ど が 可能 で す ( カ モッ ト は , CAS: で は あ 
り ま せん 。 注意 し で くだ きい 。 ま だ な 。 RS 
8, シリ アル (RS-232C) 用 で す 。 さら に デ 
ーー ジジ テイ 用 記し て は は, CRT: LPT:4 
使え ます )。 フ ァイル 名 は 14 文 字 ま で で , =. 
クス テン ショ ン は 使え ませ ん 。 BSD, BTX 
な どの ファ イル 属性 は 700 側 で 判断 し て つ 
C V Ты A 


最強 無比 の 


MZ-5500 用 の BASIC と し て , 
-2ZZ017) が 発売 き 


を 超え た すぐ で ぐれ も の で す 。 


第 一 水準 の 漢字 メモ リ (MZ-1R10), シャー プ オ ォ オリジナル の 辞書 
ロー マ 字 入力 , 
に よっ て 日 本 語 処理 が で きる の は , BASIC-2 と 同 UTI, EY 
ネス アプ リケーション に は 不可 欠 の , 表 作成 コマ ンド (TABLE), 
並べ 換え に 威力 を 発揮 する SEARCH, МАХ5, MINS, 7 
ログ ラム を 読み や すく する た め に は 仮名 8 文字 まで の 変数 や GO 
TO“ 漢 字 ラ ベル ? を 使え る し , な に より も 独 ロー カル 変数 が 使え 


ROM ボ ー ド (MZ-1R14) を 用 意 す れ ば , 


検索 ・ 


る の が うれ し いか ぎり で す (わた し の 知る か き 
使え る BASIC は , 0S-9 に ある の み で す )。 
DATA 入力 , РАТА 表示 , 


「 基 本 編 」,「 応 用 編 」,「 文 法 編 」, 


COLOR も サポ ー ト し て お о, 
5, 楽し み の 多 い BASIC と 言え ます 。 


BASIC-3 は 漢字 CPM-86(2Z-017) と モッ ト で 20,000 円 で す 。 
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Ужх--2%2 5 BASIC- 3 (MZ 
れ ま し た 。 店頭 で ご 覧 に な っ た 方 も 多い で し ょ 
22, ヒュ ー レ ッ ト パ ッ カ ー ド 系 の 巨大 BASIC で . す ぐれ た 操作 
性 , 豊富 か つ 強 力 な コマ ンド 体系 な ど , こ れ ま で の BASIC の 概念 


DATA 保護 も BASIC コマ ンド と し て 
は 万 全 に な っ て お り , 内 部 演算 は 10 進 処理 で 変換 誤差 も を も ち ま せ ん 。 
シャ ー プ で は この BASIC を ビジ ネス 用 の メイ ン に し た い 考 え で , 
マニ ュ ア ル も B 5 判 400 ペ ー ジ を 越え る 詳細 な も の で 
「 付 録 」 の 5 編 に よっ て 初心 者 へ 
の 配慮 が うか が えま す 。 ビ ジネス 用 と は いえ ., SOUND, MUSIC, 
ファ イル 処理 に すぐ で ぐれ て いま すか 


[特長 サン プル 1〕 


128 t! 
138 t! 
148 9 
158 ** 


uu MALLLLLLLLLLLLLLEELLLTLLLELLLLELLEEELEELLEEEEEETTTTTTITTTTTTITITIT] 

18" 

HüWi 1241 5-929--599% СО ЖҚ 
内 部 演算 は 1ОЖ ЕШ で 変換 誤差 が 無い 。 


f 
168 АНАДАН ДЕТТІ 


1888 А=1:В=1:2=0.1 


1818 DISP TAB (1);"A+B";TAB (20);"A-B";TAB (41); "A+B"; TAB (62);"A/B" 


1020 FOR 1-1 IO 22:С=й+В:р=-В:Е=й#В:Р=А/ 


7 a 
文節 変換 1848 NEXT I 
1858 END 


『 り ロー カル 変数 の 


「 入 門 編 」, 


jg 


A 
8 
8. 
B. 
8. 
8. 
8. 
8. 
8. 
8. 
B. 
B. 
8. 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


В 
1838 DISP C;TAB (19);D;TAB (40); Е;ТАВ (61);F:B=B%2 


ーー] 


8.99899691 
8. 808808001 


8. 0000088001 
8. 88800008881 
1Е-12 


` 
例 SAVE'"FD1:LUM" 


(ドラ イブ 1 に LUM と いう 
ァイル を SAVE す る )。 
LOAD'CMT:KYOKO", A 
(カモ ッ ト か ら , KYOKO と いう 名 前 
の アス キー 形式 の ファ イル を LOAD 
35) 
注意 : オプ ショ ン と し て コン マ A を 付け 
る と アス キー 形式 で SAVE, LOAD 
が 可能 で す 。 た だ し オプ ショ ン は , 
LOAD 時 に も 必要 で す 。 
ユー ティ リティ TRANS に つい て 
か な り 強 力 な ファ イル コン バー タ で す 。 
K/C 用 (F-DOS 上 の ファ イル を 含む ) の ソ 


名 前 の フ 


(特長 サン プル 2 〕 


108 0000101011011091100110101110111101111111111011111101111101 
9 tt ' 


2: "TABLE" 
(оту FE 218280 38 


168 ТІПТІ ТІНІ ІІІ 
:NEXT I 


288 FOR 1-1 TO 9:DISP 


ABLE 
1818 CURSOR iL 18: DISP. “ 
1828 CURSOR 5,28:DISP * 
1838 CURSOR 5,22:DISP = 
1848 CURSOR 5,22:DISP * 
2888 TABLE ,45,8,5,5,5,5:18, 
2818 CURSOR 55,18:DISP "1 
2828 CURSOR 46,19:DISP "TANAKA" 
CURSOR 46,28:DISP " UEDA ":CURSOR 8,15 


z======== "SEARCH" 


" 
文字 変数 や 文字 配列 談 数 の 中 か ら 文 字 列 を 探す 。 I! 


168 t2t2009999f99999999999999999999999999999099999990999999t9 


178 DIM $(9)w18:N=1 


188 A$(1)-"ABCFNZGHI J" : A$ (2) - " KLSHAZQRST" : A$ (3) -"UVWXY ZABCD" 
198 0$(4):"715110t252" : A$ (5) -*322€0D39)3 M : A$ (6) = A22) ЛЕЈЛА" 
288 A$(7)="5UWL093022": R$(8)** 1621- AFF": AS (9) e PSUHJS AHL" 


ЕЕ ПЕ テー ビー ビー 
= 8098555 ЫНЫ 
ш“---- T ーーー 


ра 


,1,1:CURSOR 56,16:DISP " D 
2 3 4" кө 


フト を , テー プ デ か ら も ディ スク か ら も 読み 
込み ます (わる お 80B 用 F-DOS か ら も 
読み 込め る ぞ 。SOURCE の 指定 時 に 5 を 押 
すん だ 。 だ けど 700 と 80B で は , アス キー コ 
ー ド が 違う か ら 文 字 が 化け る ぞ )。 
注意 :F-DOS H BASIC COMPILER の 
ー ス リス ト に は , 行 番号 が 付い て 
いな い の で , いっ た ん 文字 列 デ ー タ 
ファ イル と し て オー ジン し て 変数 に 
読み 込ま せ , 行 番号 を 付け て 別 の フ 
ァイル を 作り , 再び LOAD` フ ァ イ 
ル 名 ?。A と する 必要 が あり ます 。 
ファ イル AUTO RUN に つい て 
プ ブート 直 後に , 自動 的 に AUTO RUN” 


[特長 サン プル 4 〕 


168%” 
128 '' 
130 '' 
140 '' 
150 '' 
168 '' 
170 " 
188 ** 


1885 * 
1886 ' 
1887 * 


28081 ' 
2882 ' 
2883 ' 
2884 ' 


3001 ' 
3002 ' 
4000 FOR J-1 TO 9 
4818 READ A,B,C$ 
ыы t 


4038 N 


" 


5030 NEXT 
68088 CLOSE. : END 


2988 ОРЕМ "R*,1,"B:BRD-TEST* 


ВЭ УБОВЕР-ТЕБТЭЕ 
С 
を 開始 する 


(真ん中 の スペ ー ス を お 忘れ な 〈 く ) が 走り ま 
+ 購入 時 に は , ファ ンク ショ ン キ ー の 定 
義 を 行っ て いま す 。 私 は , СОГОК, ,4,0 を 
追加 し て 気色 悪い 青い バッ ク カ ラー か ら 抜 
け で て い ぃ ます 。 

ファ イル スペ ッ ク (FILESPEC) と は 

* フ ァイル ディ スク リプ タ : ファ イル ネー 
A" を 合わ せ て , ある い は その 一 部 を ファ 
イル スペ ッ ク と 言い ます 。 CP/M な どの 場 
合 は さら に ファ イル タイ プ "′ (エク ステ ン シ 
ョ ン と も いう ) を 指定 で きま す が , この D 
ISK BASIC で は BASIC が 勝手 に つけ て く 
れ ま す (0BJ, BTX, BSD, BRD% E) 

1) DIR^ フ ァイル ディ スク リプ タ ? 


108 ferent 
" 
=========== "CREATE" =========== n 


" 
етене f 


レコ ー ド 


едендік " 
N:RFORMAT:P 


(OPE T:GET) 
198 нео оннара 
288 DIM D$(9)418:0N ERROR GO SUB 7800: ІІ. "B:BRD-TESI.DAT" 
218 POR 1-1 TO 9:DS(1)=STRING$ (18,RIGHIS (SIRS (D, )):NEMI I 
228 DATA 11,12,"—",21,22,"—",31,32,"— 
238 DATA 61,62, "75", 71, 72, "^, 81,82, * V", 91,92, "h" 
1888 CREATE "B:BRD-TESI", 20, 7À 


1881! 1 レコ ュ コード UM ト で 

1902 ' (РАТА 222 EARS) 
1993 * a- 

1884 * бэ РА с ッ ク の 


,32,* 2 *,41,42, "gu", 51,52, "x" 


Ip eT EDT TESTEVE 
ンダ ム フ ァ イル の 領域 を 確保 する 。 


ラン 


3888 RFORMAT 81,4,В,С%,08 CJ) 


1077 


vis %% の AA の 組み 合わ せ を 決め る 


81025142 の ヴァ イル の 


%2 пи и NEN" d. 14 ВЕМ き 込 む 
боол ВЕ 0 ЕТИ SA ECTS 


EXT J 
5000 FOR J=9 10 1 STEP -1 
ed 


7888 IF ERL-288 THEN RESUME NEXT 


6666666666 
5555555555 
4444444444 
3333333333 


аии 


ІШІ: мара 


NEWS MZ 27 


FILES で は あり ませ ん 。 あ くま で DIR で 
す 。CP/M の 雰囲気 を 充分 に 味わっ て くだ 


きい 。 フ ジテ アイ ルディ スク リ デ 久 (FPDI: また 


は FD2:) を 省略 する と デフ ォ ル トド ライ ブ 


(デフ ォ ル ト 廊 で 指定 され だ た か, あるいは 直 

前 に 使用 し て いた ドラ イブ ) の 中 に ある フ 

ァイル を 表示 し ます 。 

2) DEFAULTY フ ァイル ディ スク リプ タ ? 
DEVICE で は あり ませ ん 。 こ れ も あ くま 

で DEFEAULT で す 。LOAD, SAVE で ファ 

イル ディ スク リプ ブタ が 省略 され た 場合 , DE- 

FAULT 文 で 指定 され た 装置 が 対象 に な り 

2%; 

3) SWAP^ フ ァイル スペ ッ ク ? 


[特長 サン プル 5〕 


CHAIN 文 は 単に ディ スク 内 の プロ グラ ム 
に 実行 を 移す だ け で す が , SWAP 文 で は E 
ND 命 令 で 再び 元 の プロ グラ ム に 帰っ て き 
ます 。 つ まり ディ スク 上 の プロ グラ ム を サ 
グル ー ナ ショ ラー ル で きる の で す (だ た だ し R 
ETURN で な 〈 く END で 帰る ) 。 これ は か な 
り 強 力 な 命令 で , プロ グラ ム の 構造 化 に 大 
い に 役 立つ こと と 思い ます 。 

4) XOPEN # ロ ジ カ ル 番 号 ヾ ファ イル スペ 

ДА 

ラン ダム アク セス ファ イル を 作る この 命 
令 が DISK BASIC の 最大 の 特徴 で ある と 
言っ て も 過言 で は あり ませ ん 。WOPEN や 
ROPEN で 作っ た シー ケン シャ ルフ ァイル 
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異なり, 一つひとつ の デー タ に 番号 (> 
ー タ 要素 番号 ) が つい て いて , 何 番 目 の デ 


ー タ で も ラン ダム に 読み 込み , 書き 込み が 
可能 で す 。PRINT キ ロジ カル 番号 , (デー 
タ 有 要素 番号 ), 変数 で 書き 込み ます 。INPUT 
# の 場合 も 同様 で す 。 

ロジ カル 番号 と いう の は , いく つも ファ 
イル を オー プン し た 場合 、 それら を 識別 する 
た め に つけ る 番号 で す 。 1 か ら 127 ま で 可能 
で すず (ひと E つ し か ファ イル を オー ジン し な 


い 場合 は 1 に し て お いて 間違い あり ませ 
ん 。 ま た , も ちろ ん MAXFILES 文 は 使え 
id). 


108 ILLELLLEELLLELELELELELLELELELEELLELELLELLELELELLELEEEEEELELELEEETEE 
18" " 
"МАХ5":"М1М5" " 


n 
HERIR (DIM) の 中 の 最大 値 : 最 小 値 を さがす 。 " 


AAMLAAAAAAAAAAAAAAAAALAAAAAAAAAAAAAAAAAAAAAAAAILIAAALLAALAALIJAI 
1888 D-38:DIM Аср) : RANDOM 
1818 FOR 1-1 TO D:A(1)=INT (RND 100): МЕХТ I 
1828 МАХ5 A(0,1,DA 


100 tttttttttttttttttttttttttttattrtttt 
118 '' 


" 
1201 仮名 を 変数 と し て 使え る 。 M 
138 '' " 
148 '' z222232 22222222 t 
158 t! t 
168 101101111111111111111111111111001111 
288 Р?ЕК?%ЕП=123 
218 Р?Е!К?%Е1=456 
220 292511=2508 
238 う ョ 99 イ 2=35 
248 ゴ " 99 イ = う ョ 9 サイ 1+ う ョ 9 サイ 2 
388 DISP "р?ЕР?УЕП-"; PIEEO 
318 DISP "P3EH27E3-"; ヤマ モト マサ ヒコ 


で 本 多 隊 数 を 総括 し て 表現 出来 る 。 
25 328 DISP " TI TIS 


(u 


олак 


AQ 
1848 DISP "9454. ; л A(";DA;")=";A(DA), 
1858 DISP "942392 y л A(";DI;")=w;A(D1):DISP 
1868 FOR 1-1 TO D:DISP "А(";1;")=";А(1),:НЕХТ I 


RUN 

PE ト 39E0= 123 

TE ト 39E コ = 456 
了 99f= 2535 

Readu 


RUN 
5191 3 à AC 2? )= 95 
AC 1 )= 23 


$1930 y A 4C 20 8 
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A(2)= B 


189 tet 
118 tt H 
12 " GOTO" 漢 字 ラ ベル 名 " と СОТО (Ж) ) が 可能 " 
1% Иннин 


288 А=1234:60 SUB 
ы! іе B-688: с 


E РР 


218 DISP A+B+C: RETURN 


AC 29 )= 36 
Ready 


SUB (A+B+C) 
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AT 11111?1129 1*9? 0? 1T 2 9 99 19 0 1 0 9 0 3 13 91 t9 t tt t t t ttt t tt tt t1 11 
" " 

128 " 22: Жүрүп — ЛЯ 2, ======= 

148 tt メイ ソン ルー チン と ЕЕ 

1 м qe tib Cni i. 

179 '' (CALL & GOSUB) H 

8 AL A ا‎ 1 0 19 

En 1 алея 297 チン を 呼び 出 

218 A=123: REM UE укса = ый 

228 DISP "1)x イ 2 l-72 J й=";А;:САШ, $7" 2080 


238 DISP "2) メ イフ 1-7) J А=";А;:60 SUB 1000 
248 " "3)xf 1-5) Ј A4 
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いし: 過 AAAAAAAAAAAAAAAAAAAAAAAMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
101 t! 
MOVE 


182 '' 
103 '' 

プロ グラ ム の 増殖 命令 
185 '' f 
106 ttttttttetttttttttentttttttttttttttttttetttattttIPIIIITI 
107! 


104 '' 
プロ グラ ム の コピ ィ ー を 作る 。 


sz======zz==== z==z=s==z==m=z=== 


CAL repta im チン で あ Жү 


2882 + サブ ルー チン ン ル ー チ ン へ 
2018 SUB £7 2008 ай : REM 
2828 6=456:DISP " 32" 2888 J A=";A:DISP :SUBEND 


= Ши 
07 ム と し て 作る 。 
[Pa 0072 作る 


RUN 
1)xf2 к-Ұ) J À= 123 
22х12 t-72 J A= 123 


Jat 4-9» J A= 789 
Ready 


97 2808 j A= 456 
77 1888 J A= 789 


1888 MOVE 188,1 
1881 ' T 


1022 1 ИЙ Ын. 
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わる お 君 の 「FIELD 文 が 使 を な く て レコ ュー 
ド 長 が 32 バ イト 固定 じゃ や な いか 」 と いう 声 
が 聞こ を て きそう で す が ひ た だ すら 無視 し ま 
し ゅ う 。 
5) そ の 他 

LOCK, UNLOCK, KILL, MERGE, S 
EARCH, LABEL, EDIT, IF~THEN~ 
ELSE な ど が 追加 され て いま す が 言 わ ず も 
WATLE De 


"^ 60 桁 ボ ー ド や CP/M も 


өөө L, まあ 私 の 目 に つい た 命令 だ け を 説 
明 し まし た が 全体 的 に 見 て 良く で きた DIS 
K BASIC で ある と 言っ て 良い と 思い ます 。 
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LAAAAAAAAAAAAAAAAAAAAAAAAAMAAAAAAALAAAAAAALAAAAAAAAAAAAAAAAAAAIAAA/ 
118 " 


=========== "KEY I 


エ よみ ー は GLKey で 
9 е で 入力 前 の テー 


N" 
INPUT し た DATA が そろ 
タ 


" 
типипипипи ип шцияпицнпиптитит ененин 
1008 DIM A(12):FOR 1-1 TO 18:DISP :МЕХТ J:TABLE ,10,8,14,8,14;15,1,1,1,1,1,1 


1010 FOR 1-1 TO 12:4(1):19100%1 


1820 CURSOR 18*INT (1/7)*22,14*1-6*INT (I/7):DISP I;"p*»" 


1838 CURSOR 38*INT (1/7)%22,14:1-64ІМІ (1/7) 
1848 KEVIN 4(D,13,2, "F," 


: E AN FILA (N, F, L, R) 
EPEE | 含む ) 


る 変数 
1050 NEXT 1 
9999 END 
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MAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAAAAIIIIIIAIIIIAA 
110 '' 


128" 
130 '' 
148 tt 
158 '' 


7 USING と IMAGE 
イメ ー ジ 記号 に よる 書式 指定 


" 
оОЦИИИИИИИИИИФИ ШЕТЕЛДЕГІ 


M 
DUM 
ゼロ サ プ レ ス され る ) 


к 


に コン マ を 入れ る 。 


1000 DIM De*28 


の 
は 
| 
上 な 
ЖУ 
の 値 は m 


1011 ' 

1828 FOR 1-1 TO 5: КЕМ 
ЕМ 
1010:08;4 


В. 
2 
な ら 負 の 時 


ら 
22 


の 


D@ の 後ろ へ 2 
指定 され た 書式 で 書く 。 
",-1.256,"”рАТА 3%% 
5",.85 


ラベ ル が 使え を る な ど , ディ スク 以外 の 命 
令 も 拡張 る され て いま す の で HuBASIC の ユー 
ザー で も 大 き な 不 満 は な いと 思い ます 。( た だ 
し コン トロ ー ル キー が ほとん ど 使 えな い の 
に は 閉口 し ます が ) 最後 に , 3 兄弟 が ぶつ 
ぶつ ひと り ご と を 言っ て いま す の で 聞い て 
み ま し ょ う 。 
わる お ドラ イブ と 拡張 ユニ ッ ト , それ に 
マス ター ディ スク (IPL 用 ROM 付 属 ) を 合 
わせ る と 20 万 円 位 め かかる じゃ な いか 。 高い 
な あ 。 イ ンタ フェ イス 用 カー ド だ け 別 売 に 
な る と いい ん だ けど 。 そ れ に HuBASIC の D 
ISK 版 は でない の か な 。 ハ ド ソ ン に 問い 合 
や せ そ みさ まう っ Ë ç 
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" 
n 
" 


t. 
ж > 
メ 
ж L 
* L 


例 


例 


ї 


см6. 


eti 


ж. 
イス 
モリ 
ОА 
ОА 


は よ よ まま よ よ まま まま は よ よ まま よ まま 
ж ディ イス 

メモ リー 
ж 行 番号 の 


よし お MZ-700 用 の 周辺 機器 は これ か ら 
続々 と 発売 きれ ます よ 。 既に PCG や 32K- 
BYTE CMOS RAM ボ ー ド は で て いる し , 
シリ アル カー ド は 発売 子 定 らし いで すね 。 
僕 し し て は , 80 桁 ボー ド や CP/M が 出 て 欲 
し いで す な 。 

ふつ お 物凄く 長い し アドベンチャー ゲー ム 
が で な いか な 。 アップル に は ,。 ディ スク 5 
枚 組 の も の が ある ん だ っ て (後藤 貴行 ) 。 

な お ,、 価 格 は 12,000 円 (IPL ROM を 含む ) 
C, 起動 する た め に は ディ スク ドラ イブ (M 
Z-1F07) お よび 拡張 ユニ ッ ト (MZ-1U03) 
の 増設 が 必要 で す 。 


|: 全 4444A4444444444444444A4A2AA44444A04A48AAAAAAAAAAAAAAAAAAAAAALAAAI 


" "LOADSUB":"CHAIN":"MERGE" 
" デイ スク 上 の プロ グラ ム を メモ リー 上 の プロ グラ ム に つなぐ 
eer 


SU ЕЕЕ 


は LOA 
る プロ グラ ム の | 


例 LOAD 5УВ"В:ТЕ57"1000.,1000,10 
* * * 
HI ме - 
АЫ Зау; 
上 LOAD する プロ 5 
1040132: 


LEETE TETE EEEE EEEE E ES 


の 指定 し た 


の 実行 
Ж アス キー ファ イル 


LOAD SUB 
ク 上 の 指定 し た の プロ グラ ム を LOAD し て 
оок 


V 
に 付け る 行 番 
A 
ЕЕЕ 


ета. 


67%1000 


m 21 
87824595 


МЕР Poo eee 


GE 

D し た の プロ グラ ム を LOAD し て 
295742240453 
MERGE "В:ТЕЅТ" 

ri 
1211111111111112111111111111111111111111111111111111111/ 


2%; 
% CRAB. 


( * 印 の 所 は 省略 出来 る 。 ) 


LOAD SUB CHAIN | MERGE 


ラム 中 で の 使用 


79 отто 
45421 8 
OLOAD 
= 
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ハー ドウ ェ ア を 構成 する も の の 中 で , も 
っ と も 基本 的 か つ 重 要 な 部 品 に 「TTL」 と 
いう の が あり ます 。 =, ПТТ 
ん な も の で ある か , お 話し し た いと 思い ます 。 


トラ ンジ スタ の 集合 体 だ ./ 


今 と な っ て は ,「 真 空 管 」 を 見 た り 触 っ た 
り し た こと の ある 人 は ご くく ご く 一 部 の 存在 


に な っ て し まっ た よう な 感 が ある の で す が | 


(「 マ ジッ クア イ 」 な ん て 覚え て いま すか 177), 
トラ ンジ スタ を 知っ て いる 方 は 多い と 思い 
ます 。 そ う , トラ ンジ スタ と いう の は 。 図 
1 の よう に 足 (導線 ) が 3 本 出 て いる 部 品 
(半導体 ) で すね 。 blott, 3000 円 くら 
いで 買え た 単 3 電池 2 本 で 動く AM ラジ オォ 
の フタ を 外し て みる と , こう いう の が 7 個 
くら い 入 っ て い だ は ず で す 。 

この トラ ンジ スタ を 記号 で 書く と 図 2 の 
よう 信 が ひま す 。 6% リコ シン (ケイ 系 ) 
や ゲル マニ ウム に , 不純 物 を 混入 し て N 型 
と P 型 を 作り , それ ら の 組み 合わ せ で , N 
PN と PNP 型 が で どき ます 。 

と ころ で , トラ ンジ スタ の 大 き さ る は 数 ミ 
VAT, ちょ うど 人 の 前 歯 と 同じ か も う 少 
し 小さ きい くら いな の で す が , 実際 の 中 身 は 
米 ツ プ よ り も は る か に 小さ いく らい で 5 
と の 大 部 分 は 指 で つま みや すい よう に で き 
て いる だ け で す 。 中 身 び け を 10 個 や 100 個 〈 
らい 並べ て も 大 し だ 大 きる に な り ま せん 。 
これ が IC (Integrated Circuit 三 集積 回 路 ) 
の 根本 的 な 考え 方 な の で す 。 


TTL は IC の 一例 だ ./ 


トラ ンジ スタ の 親類 に FET と いう 部 品 が 
あり ます 。FET と いう の は 電界 効果 トラ ン 
ジス タ の 意味 で , 外見 は トラ ンジ スタ に を そ 
っ くり な の で す が , 電気 的 な 特性 は 真空 管 
の よう に 電圧 で 制御 する タイ プ で す (トラ 
ンジ スタ は 電流 で 制御 し ます )。 そし て , Е 
ET も 1C に する こと が で きま す 。 で すか ら 。 
普通 の トラ ンジ スタ の IC は これ と 区 別 する 
た め に , 特に TTL(Transistor-Transistor 
Logic) と 呼び ます 。 


一 方 FET の うち , MOS-FET と いう 種類 | 


は , 集積 度 を と て も 高く する こと が で きる 


30  onwz 1984.5. 


NPN 型 
(250, 250) 


C( コ レク タ ) C 
B B 
(ベー ス ) 
E( エ ミッ タ ) E 


PNP 型 
(2SA, 2SB) 


と いう 特長 が あり ます 。 集積 度 の と て も 高 
CICI, 特に LSI (大 規模 集積 回 路 ) と 呼び , 
大 抵 MOS-FET で で き て いる と 思っ て 間 違 
いあ り ま せん 。 Z-80CPU,。 な ん て いう 部 品 
t, も ちろ ん そう で す 。 

また だ, MOS-FET を コン プリ メン タリ と 
いう 回 路 構 成 IC 内 部 で ) に する と , 極端 
に 消費 電力 を 少な て で きる と いう メリ ッ ト 
が あり ます 。 その か わり 集積 度 を 上 げ る の 
は 難 か し てく な る の で , 主 に TTL の よう な 簡 
単 な IC の 置き 換え と し て 使わ れる こと が 多 
いよ う で す 。 こ の よう な 1IC は , 特に C-MO 
5 (コン プリ メン タリ MOS の 意味 ) と 呼び 
ます 。 ちなみに, 27-80% EIZN-MOSOL 
SI と 呼び ます 。 た と えば , 普通 の パソ コン 
で TTL を 使う よう な 場所 で も , ハン ド ヘ ル 
ド 機 な ら C-MOS を 使う の で す 。 電池 が 長 
持ち し ます か ら ね 。 


TTL を 見 て みよ うぅ 


シャ ー プ の パソ コン と いう の は , 何かと 
本 体 を 開け る 機会 に 恵まれ て (?) UT, 
グラ フィ ッ ク RAM や 拡張 ユニ ッ ト を 取り 付 
けた だ たり て, 皆さん も 一 度 く らい は 中 身 を 見 
だ こ が あ る か と 思い ます 。 も し 。 ま だ で 
し た ら , 一 度 マ ニュ アル を 参考 に 本 体 の フ 
タ を 開い て みて くだ さい (他社 の マニ ュ ア 


反対 側 に も ビ 


SN74LS175 


2.54mm と 決ま っ て いる 8 番 ビ ン 


ЖЕН, こん な こと は 書い て な いっ /)。 = 


NHORS, と いう 人 は , 本 誌 1 月 号 の カ 
ラー ペー ジ を 見 る と 良い で し ょ う 。MZ-5500 
の 中 身 が 写真 で 載っ て いま すか ら 。 

きる て, TTL, 2X 1cm く らい の 大 きき 
で 足 (ピン , 導線 ) が 片側 に 7 個 ~ 8 個 , ІШ 
側 で 14 個 か 16 個 ある 黒い 物体 で 、 背 に “74 
LSX メ XX? な ど と 書い て ある は ず で す 。 
メメ メ は 2 一 3 桁 の 数 字 で , 先頭 に SN など 
が つい て いる も の (TI 社 製品 等 ) も あり ま 
+. また , 77406” の よう に LS の な いも の , 
最後 に N′ な どの アル ファ ベッ ト が つい 
て いる も の も あり ます 。 1 台 の パソ コン に 
は , 20~200 個 くら い の TTL が 入っ て いま す 。 
TTL は , 米国 の TI (テキ サス イン スト ッ ゥ ル 
メン タル ) 社 が オリ ジ ナ ル を 数 百 品種 出し 
сет, 日 米 の 多く の メー カー, 日 本 で は 
Ну, 三菱 , 富士 通 な ど が ライ セン ス 契 約 
を し て 。 同 選 よ うだ に 合え る ゼン ショ コン パチ デ 
ル な も の を 発売 し て いま す 。 た と ぇ ば, TI 
社 の SN74LS00 と 日 立 の HD74LS00, 三菱 
の M74LS00, 富士 通 の MB74LS00 と は 完全 
に 交換 で きま す 。 

な お , TTL と 同じ 形 で も , 4116 と か 4164 
と 書い て ある も の は , メモ リ 用 LSI で す 。 
8255, 8253, Z-800 X 5 Z E 3401] b # 2 
も の も , 制御 用 LSI で す 。 
つづ き は また 次 回 、 お た の し み に 。 


MZ は クリ ー ン コン ピュ ー タ で す 。 tv 
う の は ユー ザー が 使用 で きる メモ リ を 大 量 
に 持っ て いま すか ら , BASIC 以 外 の 言語 を 
簡単 に 走ら せる こと が で きる と いう 特徴 を 
持っ て いる と いう こと で す 。MZ-80K/C の 
時 代 に は 、 そ の 特徴 が 最大 限 に 生か きれ , 
いろ いろ な 言語 が 発表 きれ て , まる に クリ 
ー ン コン ピュ ー タ の 黄金 時 代 だ っ た と 言え 
る で し ょ う 。 しかし, МЕСТ, それ 
ら の 言語 は ほとん ど が 忘れ 去ら れ て いる の 
で は な いで し ょ うか が 。 ク リー シコ ョ コンピュー 
タ で 使え る 言語 に は 何 が ある か と 聞か れ た 
Ез, イン タブ リタ PASCAL。 WICS, B 
ASE な ど は す で 思 いつ いて も , ほか は な か な 
が 言え を まぜ ん 。 そ を そこ で , 埋 6 れ て し まっ た 
言語 を 発掘 し よう と いう こと で 今回 の 特集 
が 生ま れ だ わけ で す 。 対象 は 、 80K/C の 子 
陀 と も いえ る 700 で す 。 しかも, テー プ 版 の 
も の の み を 集め て み ま し だ た 。 と いっ て も 。 
700 用 に は 2 一 3 の シス テム ソフ ト と BASE, 
WICS し か 発表 きれ て いま せん 。 227, 
今回 紹介 する 言語 は も と も と が 80K/C,1200 
用 に 発表 きれ だ た も の ば か り に な っ て いま す 。 
し か し , それ ら の 言語 は , ほとん ど が その 
まま 700 で 使え を る よう に な っ て いま すか ら 心 
配 は いり ませ ん 。 その まま で は 動か な いも 
осы, 本 誌 83 年 4 月 号 で 発表 きれ た モニ 
タ SP-1002 の 改造 版 で ある FN-700 か ら ロ 
ー ド し て や れ ば も う 完 全 ほ と いっ て いい ほど 
動か すこ と が で きま す 。 FN-700 に モニ タ を 
変換 する こと が 必要 な も の は , それ を 示し 
て あり ます 。 

な お , 今回 紹介 する 言語 は , GAME, PA 
LL, FORM(FORTRAN-MZ), microPA 
SCAL, ТЫЛ, LISP, FORTH(FORTH 


/5, M-FORTH) の 7 種類 で す 。 こ れ ら の 
中 に は 販売 きれ て いな いも の も あり ます が , 
機械 語 の 全 リ スト が 雑誌 で 発表 きれ て いま 
すか ら , それ を 打ち 込む 気力 と 体力 が あれ 


ば 使用 する こと が で きる で し ょ う 。 
それ で は 。 ク リー シュ ンピュータ 革 語 の 
世界 に 入っ て い 《 こ と だ に し まし ょ う 。 


GAME は Tiny BASIC と も いえ る VTL 


な どの 記号 言語 を 拡張 し た も の で , 78 年 5 


月 号 の ASCII 誌 で 初め て 発表 きれ まし た 。 
製作 者 の 大 西 博 氏 は 6800 版 の も の を 発表 し 
た わけ で す が , その後, 8080, 7.80, 6502 
な どの 人 各 CPU に 移植 きれ, ASCII 誌 上 で は 
BASIC と 並ぶ 共通 言語 と し て 注目 され て い 
155947 

GAME は も と も と 整数 型 BASIC を も と に 
し て いま すか ら , 機能 も それ を その まま 受 
け 継 いで いま す 。 それ に 加え ぇ て, 16 進数 の 
処理 機能 や 間接 モー ド に よる メモ リア クセ 
ス 機 能 を 持っ て いる た め , 機械 語 的 な オペ 
レー ショ ン を する の に 便利 に な っ て いま 
+, しかし, GAME の 特徴 は 何と いっ て 
も その 実行 速度 で し ょ う 。 こ れ は , 命令 の 
表現 が 単純 に な っ て いる (を の 反面 。 プロ 
グラ ム は 読み に くい ) た め 構 文 解釈 が 速く 
で きる だ た めで, 当然 と に え ば 当然 で す が , 
速度 を 要する ゲー ム な どの プロ グラ ム に は 
うっ て つけ の も の で す 。GAME と は General 
Algorithmic Micro Expression (一般 的 な 
算法 の た め の 小 型 表現 と で も 訳す の で し ょ 
5») の 略語 ど を そう で す が 、 製作 者 の 頭 の 
中 に は これ で ゲー ム を 作る こと が 第 一 に あ 


表 1.1 GAME-MZ の エディ タ ・ シ ステ ム 関 係 の コマ ンド 


コマ ンド | 例 ] 意 味 
0 ү すべ て の ブロ グラ ム の リス ティ ex, I 
行 番号 / 100/ 行 番号 か ら の リス ティ ング 。 
#=n ET | n 以 上 の 値 を も つ 最 初 の 行 番号 か ら 、 プロ グラ ム を 実行 
%-0 ソー ステ キス ト の クリ ア 。 
&:0)-SFF | | ソー ステ キス ト を 修正 可能 に する 。 
&:0)-$F0 ソー ステ キス ト を 修正 禁止 に する 。 


== | ソー ステ キス ト の 未 尾 を 探し て EDOF マ ー ク を セッ ト す る 。 


=n = $2000 ソー ステ キス ト の 格納 番地 を n か ら と みる 。 
*-n ж = $A000 ソー ステ キス ト の 格納 番地 の 上 限 を nm に する 。 
> = $5DD0 E wa RAM の 内 容 を ファ イル ネー ム を 付け て カセ ッ ト に セー ブ す る 。 
"File Name” | > =SSDDOPT | こ か ら & で 示さ れる 額 壊 が セー プ さ れる 。 
> =$5Е00 テー ブ の 内 容 を ロー ド す る 。 
>-55Е20 | テー ブ の 内 容 を ベリ ファ イ す る 。 
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ら 湊 の で は だ な だい でしょ うか が か 。 

GAME に は また だ た, GAME 自身 で 書か れ た 
コン パイ ラ が 発表 きれ て いま す 。 GAME イ 
ンタ プリ タ だ け で も BASIC の 2 倍 の 速 る で 
ある の に , コン パイ ラ を 通す と 約 20 倍 の 速 
き に な る こと が わか っ て いま すか ら , これ 
は 驚き 以外 の 何 物 で も あり ませ ん 。 

と ころ で , GAME に は 「 超 CPU シミ ュ レ 
ー ジ ョ ジ 言 語 」 と いう な ん と も 雇い うた い 
文句 が 付け られ て いま す 。 これ は , 16 ビ ッ 
ト の 汎用 レジ スタ を 26 本 と エディ ッ ト 機 能 
を 持ち , 記号 命令 で 動く よう な 超 CPU を 考 
える と き , GAME は その 動作 の シミ ュ レ ー 
ショ ン を や っ て いる の に ほか な ら な いと いう 
こと で す 。 これ は , Tiny BASICE GAME 
の 違い を 明確 に する た め の 理 解 の 仕方 の ひ 
と つ で す が , 少し 大 像 小 な よう な 気 も し ま 
す (し か し , こ の うた い 区 名 は 大 好き で す )。 


エディ タ ・ シ ステ ム 関 係 
表 1.1 に エディ イタ お よび シス テム 関係 の 
コマ ンド の 一 覧 表 を 示し ます 。 また , [1.1 
に GAME-MZ の メモ リマ ッ プ "を 示し ます 。 
GAME に お ける プロ グラ ム の 作り 方 は B 
ASIC と 何ら 変わ り が あり ませ ん 。. つ まり , 
キー ボー ド か らし , 
行 番号 文 
と いう 形式 で プロ グラ ム を 打ち 込ん で いけ 
ば いい の で す 。 もちろん, スクリーン エ デ 
ィ ッ ト を する こと も 可能 で す 。 
作成 し た プロ グラ ム は カセ ッ ト テ ー プ に 
セー プ 。 ロ ー ド を する こと が で きま す 。 こ 
の 機能 は GAME が MZ に 移植 きれ る 際 に 付 
け 加 えら れ た 機械 語 サ プル ー チ ン に よっ て 
いま す 。 したがって, 実際 に モー プ ブロード 
を 行なう と き に は , GAME の 機械 語 サ ブル 
ー チ ンコ ユー ル の 命令 で メモ リ の 番地 を 直接 
図 1.1 GAME-MZ フ メモ リマ ッ プ 


Eo. Кар өні 
ホッ トス ター ト 55802 


51200 


イン タプ リタ 
$5DD0 
オプ ショ ナル 
機械 語 サ プ ブルー チン 
$5ЕА0 


$5Е00 
変数 *・ ス タッ ク 
領 域 
$6000 
拡張 RAM 領 域 
$D000 


$5800 


ュー ル し ます 。 す な わ ち , セー プ は , 
>=$5DD0 “ファ イル ネー ム “ 
DERT そして, ロー ド は , 
> = $5E00 
の 形式 で 行ない ます 。 ま た , テー プ の 内 容 
を ベリ ファ イ す る に は 次 の よう に し ます 。 
> =$5Е20 
GAME に よる プロ グラ ム を 実行 する に は , 
GAME の GOTO 命 令 ( キ =) を 使っ て 実行 を 
開始 する 行 番号 へ ジャ ンプ し ます 。 こ の と 
き 指 定 する 行 番号 は 実際 に 実行 する 行 番号 
より 小さ (て 構い ませ ん か ら , プログ ラム 
を 最初 か ら 実行 きせ る と き は , 
#=1 
で よい の で す 。 ま だ プログ ラム の 実行 は , 
[SHIFT] t [BREAK | を 同時 に 押す こと で 
中 断 す る こと が で きま す 。 
文 法 
e 定数 ・ 変 数 
GAME で 扱え る 数 は 10 進 数 と 16 進 数 で す 。 
16 進 数 は 数 字 の 前 に $ を 付け て 10 進 数 と 区 
別 し ま す 。 
(ff) 1, 10, $0D, $80A0 
変数 名 は AZ まで の 26 種 類 に 限ら れ ま 
す 。 た だ し , 冗長 な 名 前 を 付け る こと が で 
きま すか ら , 変数 に ある 程度 意味 も 持た せ 
る こと が で きま す 。 
(ff) А, B, АСС, ASSOC 


表 1.2 GAME-MZ で 使用 で きる 文 


(た だ し , А, АСС, ASSOC は 同 
じ も の と 見 な され る ) 
ө 配列 
GAME で は BASIC の DIM 文 に 相当 する 
配列 宣言 は な く , ユー ザー が メモ リ 上 に 直 
接 指定 する 方 式 に な っ て いま す 。 配 列 へ の 
アク セス は , 配列 名 に メモ リ 上 の 番地 を 代 
入 し , そこ か ら の 変位 を 指定 する こと で 行 
が Ne ます 。 E EE; 
А = $8000 
で ある と き 。 
Асп) 
iX, $8000+ п ЖШ, 
А (n) 
は , $8000--2n, $8000+2n + 1 b 2 
味 し まず 。 し だ が っ て 
А:1) = SAB 
は , $8001 番 地 の 内 容 を $AB に する こと , 
A(1) - SABCD 
は , $8003, $8002 番 地 の 内 容 を , それぞれ , 
$AB, $CD に する こと を 意味 し ます 。 
まだ 。 
B=A:1) 
は $8001 番 地 の 内 容 を 変数 B の 下位 バイ ト 
の 値 と する こと (上 位 バ イト は 0), 
В-А(1) 
は , $8003, $ 8002 番 地 の 内 容 を 変数 B の 上 
位 バ イト , 下位 バイ ト の 値 と する こと に な 
り ま す 。 


特集 クリ ー ン コン ピュ ー タ と 言語 


e = 
算術 式 は , 定数 や 変数 を 以下 の 演算 子 で 
結合 し た も の で す 。 
+ (た し 算 ) 
- (ひき 算 ) 
ж (か け 算 ) 
/ (わり 算 ) 
を そして, これ ら の 間 に 優先 順位 は あり ませ 
ん か ら , 式 の 評価 は 左 か ら 行 な われ る こと 


に な り ま す 。 だ だ も, Ç ) 和 を 用 いる と 。 そ ぞ そ 
こ が 優 先 る され ます 。 
(9) 1+2ж3 の 値 は 9 
1+(2ж3) の 値 は 7 
また , 論理 式 に 使わ れる 演算 子 は 以下 の 
ЕЗІН ТЫ 
> (大 きい ) 
>- (大 きい か 等 し い ) 
< (小さ い ) 
<- (小さ いか 等 し い ) 
= (等 し い ) 
<> (等 し く な い ) 


そし て , 論理 式 の 値 は 真 の と き ー1, 180 
と き 0 と な り ま す 。 
( 例 ) =1 の 値 は ー1 
1=2 の 値 は 0 
その 他 の 演算 子 と し て は , 次 の よう な も 
の が あり ます 。 
(ビッ ト ご と の AND) 
(ビッ ト ご と の OR) 
! (ビッ ト ご と の XOR) 
( 例 ) "A". SF0OffiX 540, 1! 1 の 値 


文 の 種類 | вт 意 味 は 0 
RAX 変数 = 式 式 の 値 を 変数 に 代入 する 。 ө x 
[4 ; = の 値 が 0 な ら 次 の 行 る 。 В 4 259% А 
ーー - £ алы қаданы GAME の 文 は ほとん と が 特殊 変数 へ の 代 
== 式 で 示す T MN Sede. 
k な ` 7, — 47 
БОБ | тг е. СЕ етот すなわち , 一 般 的 な 
STOP ==] プロ グラ ム の 実行 を 止め る 。 形式 は 次 の よう に な り ま す 。 
CALL >= 式 で 示さ れる 番地 か ら 始 まる 機械 語 サ ブ プルー チン の コー ル 。 | 特殊 変数 = 式 
GOSUB | = 式 式 で 示さ れる 行 番 号 か ら 始 まる サブ ルー チン の コー ル 。 具体 的 に は 表 1.2 に 示す よう な も の が あ 
RETURN ] サブ ルー チン か ら 戻 る 。 り ま す 。 
FOR RM MAE, E ао жщз вох соса, 終値 を 越え る まで e 関数 
PRA. all ЖЕН a T 
ms а-тизна | 問 の 文 を 繰り 返す 。 KS 2 な も の 
e: : が あり ます 。 関 数 の 値 は 代入 文 な ど に 使用 
mo ' | емен 式 の 値 が 0 で な く な る まで , 間 の 文 を 繰り 返す 。 し ます 。 
UNTIL e = (st) (M) A=$ 
PRINT ? = 式 式 の 値 の 10 進 左 詰め 出力 。 R =*g0 
? ( 桁 )= 式 式 の 値 の 10 進 右 詰め 出力 ( 桁 数 を 指定 )。 
77 «Ж 式 の 値 を 16 進 4 桁 て 出力 。 ө その 他 
78 == 式 の 値 を 16 進 2 杵 (下位 バイ ト ) で 出力 。 
$ =з 式 の 値 の 下位 バイ ト を ASCII コ ー ド と みた 文字 の 出力 。 表 1.3 GAME-MZ て 使用 で きる 関数 
SPACE == 式 の 値 と 同じ 数 の 空白 を 出力 。 ж-а 
ТАВ ‚= 式 の 値 と 同じ 数 だ け カー ソル 位置 を 進め る 。 hes Шы ааа s 
F ン スー ° 
CRL 改行 する 。 INPUT キー ボード か ら 入 力 され た 1 文字 
文字 列 出 カ "XB 文字 列 を 出力 する 。 $ | の Asoll コ ー ド を 値 と する 。 
SET RND `= 乱数 レジ スタ の 初期 値 を 式 の 値 に する 。 Е 押さ れ た キー の ASCII コ ー ド を 値 
Ган к | 行 番号 の あと , 空白 を あけ な いと その 行 は 注釈 行 。 Ser КТА 
マル チ ス テー トメ ント 文 を 空自 で 区 切る と マル チ ス テー トメ ント 。 RND | '* | | 一式 の 間 の 乱数 を 値 と する 。 | 


特集 MZ は コト バ の 天才 で ある 242 


%--2, ビード, ペリ ファ イ 以外 に . も 。 
組み 込み の 機械 語 ナ サナ ブ ルー チン と し て , Ж 
ウン スク ロー ル , レフ トス クロ ー ル , ライ 
トス クロ ー ル が あり ます 。 それ ぞ れ の エン 
トリ ー 番 地 は , $ 5Е40, $ 5Е60, $ 5E70 と な 
っ う で て いま す 。 

( 例 ) >- 55Е60 


サン プル プロ グラ ム 

GAME は 前 に も 述べ まし た よう に ゲー ム 
を 作る の に 適し て いま す 。 そこ で ゲー ム を 
作っ て み ま し た だ た 。 これ は , 昔 ぜ ー ム セン タ 
ー に あっ だ ボー ル を ラケット で 打ち 返す と 
いう 単純 な ゲー ム を も っ と 上 単純 に し た も の 
CT, を の ブログ ラム を リリ 下 1 に 示し ま 
+, DARU, 21,00%-СЖж0О>” 
> k, 還 と [で 右 の ラケット を 操作 し て , 
どちら か が 失敗 する まで ボー ル を 交互 に 打 
ち 返 す と いう も の で す 。 

kt, プ ブログ ラム の 中 で , 1 4 行 は 画 
面 の 色 の 設定 、 10 一 30 行 が リア ル タ イ ムキ 
一 入力 の た め の 機 械 語 サ プル ー チ ン の 作成 
を 行なっ て いま す 。 

ij, この プロ グラ ム で は BASIC ら し さき 
リス ト 1 GAME-MZ サ ンプ ルプ ログ ラム 


1 1=%08080, $DBE フ 1:0)-6 @=I+1 
2 1=$D899, $DBE フ 1:0)-39 1:39)-23 @=I+49 
3 1=$D891 , $D826 1:0)=71 1:960)-71 e-I*1 
4 1=%083В, $DBRB I:0)-2 @=I+49 
10 A=$SEAQ (9)=$9118 АСТ 〕)=$3RF9g 
20 R(2)-$5ER2 (3)=$9932 ñ(4)=$3ñE0 
за (5)=$E991 ñ(6)=$ñ232 АС7)=%С95Е 
40 С=2Ж(/2) F-0 G-F 0=12 0-0 
50 Х-“21%8 Ү=1 E=9 A=$SEAZ り =$D999 
60 "B" 9-185 L-62 R-D 5-0 9=181 
28 К-0 5-39 ?-181 
80 %-300 ;-EOO9 Н=1,5 >=$3E Ө-н%| #=11@ 
90 %-800 %-805 2-805 9=899 
100 Н-1,1000 @=H+1 #=89 
118 ;=С<3 F=F+19 C-4 #=14@ 
120 ;-С>2 Q=Q+19 C-2 
140 "Я" Н-1,13 "HB" Ө=Н+1 ?-F " 95 
" ?-0 H-1,10000 @=H+1 ^ 
160 "UBSBBBBBEPUSH ANY KEY FOR NEXT BALL" 
120 H-$ H-1,5000 @=H+1 »-$3E 8-50 
180 М=Ү N-X %-200 1 
181 M-R №5 9=299 
182 М=8-1 9-200 М=8+1 9-200 1 
185 (-21 9=189 .) 
200 U:40%M+N)=L 1 
380 9-400 X-2X(C43)*X-1 Y-(C/2X2-C)X2*Y- 
1 272185 9-500 1 
400 L-62X(E-0)XCCX-20)*(X-39)) 9-180 1 
500 К-(12-Ү2/12%С ;-СОК C=K >=$3E 
502 ;=Х=@ Е=(Ү-0)/2 ;-E-0 C-C-2 >=$3E 
503 ;=Х=39 Е-(Ү-02/2 ;-E-0 C-C*2 >=$3E 
504 1 
200 %-210 G-3-I-I ;=1=@ H-1,100 @=H+1 1 
201 M-R-G N-S L-0 9=299 
202 R-CI-1)XCRX23)-CCIZ22)XCRO 1 22 *R 
203 =R+G L-62 %-200 1 
218 ñ:0)=T >=$SERg 
211 ;=ñ:0)=U 1-1 ] 
712 б:03-Ы »-$5ERn0 
213 j;-8:0)-2 I-2 J 
214 1=@ 1 
800 R-D I=B T=$F1 U-$BF Ы-ӨҒ2 2-%2Ғ 
801 5-й %-208 D=R B-I 1 
805 R=0 I=J T=$F2 U-$FD Ы=$Е@ z=$DF 
806 S=39 9=299 O-R J-I 1 


を 出す た め に , マル チ ス テー トメ ント を 多 
用 し た り , 算術 式 論理 式 の 演算 に よる IF 文 
の 排除 た いっ た こと を し て いま す 。 こ の た 
D, お 世辞 に も 「 読 みや すい 」 プ ログ ラム 
と は 言え な いも の に な っ て し まい まし た 。 


ちょ っ と ひと 言 

GAME は その モデ ル を Tiny BASIC に 置 
いて いる た め , BASIC そ の も の が も つ 和 欠点 
を 聞 露 し て いる 言語 と 言え ます 。 作 者 の 大 
西 氏 自身 ASCII 誌 上 の 連載 で GAME は A 
lgol 系 の 言語 に 取っ て 替 わ ら れる で き マ イ 
ュ ン 初期 の 時 代 の 言語 で ある こと を 認め て 
いま す 。 そ の こと が , 同じ 大 西 氏 の 提案 に 
よる TL/ 1 に 結び つい て いく こと に な っ だ た 
の は 確か だ びと 思わ れ ま す 。 し か し , BASIC 
が , 死 減 する どこ ろか 成長 を 遂げ , し か も 
その 頭 文字 の 意味 で ある 『 初 心 者 の た め の 』 
と いう レベ ル を は る か に 超え て 存在 し て い 
る 現在 に お いて , GAME は 使う 価値 が な い 
と 言い 切る の は 言い 過ぎ の よう な 気 も し ま 
す 。 や は り , その 実行 速度 の 速 さ と メモ リ 効 
率 の 良さ は 十分 評価 に 値する も の で し ょ う 。 
< 参 考 文献 > 

° 大 西 博 『GAME」 ASCII 78 年 5 一 10 月 号 
° 間宮 信義 『GAME-MZ イ ンタ プリ タ 」 AS 
СП 79 年 10 月 号 間宮 信義 『GAME-MZ 


コン パイ ラ 』 


ASCII, 79 年 10 月 号 


きる よう な プロ グラ ム を 作る こと に あり ま 
+, この よう な 目的 を 果たす だ ため に は BASIC 
で は 不 十分 な 点 が 多 す ぎ ま す 。 そこ で 人 々 
の 目 は 構造 化 に 適し た Algol 系 言語 で ある 
PASCAL に 向け られ る こと に な る の で す 。 

し か し , PASCAL は 言語 自体 が か な り 大 き 
ORD, 少な く と も デイ スク が な けれ ば 利 
用 する の は 困難 で す 。 そこ で , 機能 の 面 で 
は 標準 PASCAL か ら は 大 幅 に 劣り ます が , 
MZ-80K の 基本 シス テム (20KRAM) で だ 
け で も 構造 化 プ ログ ラミ ング の 雰囲気 を 味 
わっ て も ら お うと いう の が , PALL の 設計 者 
の 意図 びと 思わ れ ま す 。PALL と は Practice 
of ALgol Language (Algol 言 語 の 練習 ) の 
略語 だ ど を そう で す が , この こと か ら も , PALL 
が PASCAL の た め の 学 習 . トレーニング 
用 言語 だ ど と いう こと が わか り ま す 。 こ の よ 
うに , PALL は Tiny PASCAL と は 呼ば れ 
て いま せん が 。 を その 分 だ け PASCAL に と ら 
われ な い 自 由 な 設計 が る され て いる と 言え る 
€ Ld» 

PALL は , UCSD PASCAL が そう で あ 
うだ よう に 。 エ ディ タダ で 作成 し た ッ ー ス デ 
ログ ラム を , 中 間 コ ー ド に ひと まず 落と し , 
それ を 仮想 スタ ッ ク マ シン と 呼ば れる 一 種 
の プロ セッ サ て 解釈 し 実行 する と いう 方 式 
を 採用 し て いま す 。 こ れ ら の こと は すべ て 
ON MEMORY で 行なわ れる た め , PALL 
は コン パイ ラ と 言っ て も イン タプ リタ と い 
う 感 が 強く , プロ グラ ム の 開発 が 容易 に な 
っ て いま す 。 そのため , 実行 速度 の 面 で は 
我慢 を し な けれ ば な り ま せん が , これ は し 
が だ の な いこ と で し ょ う 。 


m = 
PALL は 79 年 12 月 号 の I/O 誌 上 で ハ ド ッ 
ン ソ フト に よっ て 発表 きれ まし だ た 。 こ れ は , 
マイ コン 界 に 構造 化 デ ログ ラミ ング 論争 が 
及 ん で くる こと を 見 越し た も の に 違い あり 5 
ませ ん 。 構造 化 デ ゲロ グラ ミン グ に つい て は 
色々 な こと が 言わ れ て いま す が , その 目的 
は , 理解 し や すく デバ ッ グ や 修正 が 楽に で 


エディ タ ・ シ ステ ム 関 係 

PALL の エディ イタ は ソー スプ ログ ラム を 
作成 する ほか に プロ グラ ム の コン パイ ル と 実 
行 を 管理 し て いま す 。 こ の た だ ため , PALLO 
エディ タ は PALL モ ニタ と 呼ば れ て いま す 。 
表 2.1 に PALL モ ニタ の ユマ ンド の 一 覧 表 
を 示し ます 。 ま た だ た , PALL の メモ リマ ッ プ 
は 図 2.1 の よう に な っ て いま す 。 


表 2.1 PALL モ ニタ の コマ ンド 
コマ ンド 一 般 形 意 味 
Insert І ソー スプ ログ ラム の 入力 。 ソ ー ス が 存在 する と き は アペンド 。 
Break B ライ ン ポ イン タ の 直前 へ | 行 挿入 。 
Position P= 行 番号 ライ ン ポ イン タ を 指定 の 行 へ 設定 。 
Delete D ライ ン ポ イン タ の 指す 行 を 削除 。 
List L ライ ン ボ ポイ ンタ の 指す 行か ら の プロ グラ ム の リス ト 。 
Search 5, 文字 列 指定 する 文字 列 の サー チ 。 
Write | w ソー スプ ログ ラム の カセ ッ ト テ ー プ へ の セー ブ 。 
Yank Y ソー スプ ログ ラム の カセ ッ ト テ ー プ か ら の ロー ド 。 
Run RUN | ソー スプ ログ ラム の コン バイ ル と 実行 。 

| Bye ! ж-е 7% 

| New & ソー スプ ログ ラム を すべ て 抹消 する 。 


34 ohiMZ 19845. 


ソー スプ ログ ラム を 作る だ た め に は , この 
PALL モ ニタ か ら エコ マン ド を 打ち 込ん で 
開始 し ます 。 こ の と き , BASIC と は 違い , 
行 番号 は 付け ませ ん 。 こ の コマ ンド か ら 抜 
ける た め に は [SHIFT |+[ BREAK] を 押し 
ます 。 作成 し た プロ グラ ム の リス ト は L コ ュ 
マン ド で 見 る ごと が て きま す 。 さこ の コマ ンジ 
ド の 実行 後に は スク リー ン エ ディ ッ ト を す 
る こと が 可能 に な っ て いま す 。 なお, この 
と き PALL モ ニタ は プロ グラ ム を 編集 する 
た め の 行 番号 を 付け て リス ト を 示し ます 。 
この 行 番号 は ソー スプ ログ ラム に 1 行 挿入 
LD, ソー スプ ログ ラム か ら 1 行 削除 し 
たり する と き に 使用 きれ る も の で す 。 た と 
えば , n 行 目 の ひ と つ 前 に 1 行 挿入 する 場 
合 は , 

Р-п 


と し た あと , 文 を 書け ば よい の で す 。 ま た 。, 
n 行 目 を 削除 する と き は , 


Р-п 
р 
と し. まず > 


ソー スプ ログ ラム を 実行 する に は 
RUN 
と 入力 し ます 。 ま た だ, デ ロ グ ラム は ツー ヌス 
プロ グラ ム の レベ ル で カセ モ セット テ ー プ に 保 
存 で きま す 。 こ の た め の コ マン ド が WEY 
СЗ» 


x ж 
e プロ グラ ム の 構造 
プロ グラ ム の 構造 は , 図 2.2 の よう に , 
トッ プ ダ ウン に 読み 下 せ る 構造 に な っ て い 


[02.1 PALL の メモ リマ ッ プ 


as FATE el 
ホッ トス ター ト 5203Ғ 


52000 


$2С74 


$2D6B 
仮想 スタ ッ ク マ シン 


$35F3 
ソー スプ ログラム 


変数 ,。 ス タッ クエ リア 


VRAM 


図 2.2 PALL の プロ グラ ム の 構造 


$D000 


ます 。 こ の た め , 手続 き や 関 数 は それ を 使 
用 する より も 前 に 定義 きれ て いな けれ ば な 
り ま せん 。 したがって,。 メイ ン ル ー チ ン は 
プロ グラ ム の いち ば ん 最後 に 記述 され る こ 
と に な り ま す 。 メ イン ブロ グラ ム は BEGIN 
で 始ま り END. で 終わ る 一 個 の 複合 文 で す 。 
メイ ン ル ー チ ン の 終わ り の END の . は 必ず 
付け な けれ ば な り ま せん 。 

e Ex XX 

PALL で 扱う こと の で きる デー タ は 10 進 
数 , 16 進 数 , 1 文字 の 3 種類 で す 。16 進 数 
定数 1 文字 は , 10 進 定数 と 区 別して , 2 
れ ぞ れ , その 前 に $,“ を 付け て 表わし ます 。 

(ІЙ) 10, $1F, $12A0, "A 

変数 名 は A — ZOX f Chii 28001 
の 文字 や 数 字 の 列 で す 。 こ れ は 変数 宣言 部 
に お あい で 

VAR 変数 1, 変数 2, …, 変数 n: 
の 形 で 宣言 し て お きま す 。 なお, プロ グラ 
ム の 頭 部 で 宣言 きれ る 変数 は , プロ グラ ム 
中 の すべ て の 場所 で 有効 な 大 域 変 数 , 手続 
š や 関数 の 中 で 宣言 きれ る 変数 は , その 手 
jt e や 関 数 内 だ け で 有効 な 局所 変数 で す 。 
大 域 変 数 と 局所 変数 は 名 前 が 同じ で も 構い 
ませ ん 。 そ の と き は 局所 変数 の 値 の ほう が 
優先 し て 使用 きれ ます 。 

e 配列 

配列 は , プロ グラ ム 先 頭 の 配列 宣言 部 で , 
ARRAY 配列 名 1[ 大 き さ る 11,…, 配列 
名 n [大 きる n] : 

の 形 で 宣言 する こと で 使用 する こと が で き 

ます 。 た だ ただし, これ は 整数 型 一 次 元 配列 の 

ӨС» TEAR 

ARRAY A[10] : 

と すれ ば , A[0] 一 A[ 9 ] で アク セス で きる 
10 ワ ー ド (1 ワー ド は 16 ビ ッ ト ) の 領域 が 
確保 され ます 。 

と ころ で , 配列 宣言 を し て いな (て も 変 
数 名 に [ ] を 付け て メモ リ 上 の 領域 も アク 
セス ずる こと が で きま す 。 だ と えば , WX 
表 2.2 PALL で 使用 で きる 文 


特集 クリ ー ン コン ヒュ ー タ と 言語 


B の 値 が $8000 と すれ ば , B[n] と いう の 
は , メモ リ 上 の $8000 十 2n, $8001 十 2n 番 
地 の 領 域 を 意味 し ます 。 し た が っ て , B[n] 
を 代入 文 の 左辺 や 右辺 に 使う こと に よっ て , 
POKE, PEEK の 機能 を 実現 する こと が で 
きま す 。 

@ 式 

式 と は , 変数 や 定数 を 演算 子 で 結び 付け 
だ も の で す 。 

PALL で 使用 で きる 算術 演算 子 は 次 の よ 
うな も の が あり ます 。 


+ (UR) 
- (ひき 算 ) 
ж (» X) 


ж (わり 算 の 商 ) 

MOD (わり 算 の 余り ) 

一 方 , 論理 演算 子 に は 次 の よう な も の が 
あり ます 。 


< (大きい) 

> (аж) 

- (等 し い ) 

NE (等 し く な い ) 
e x 


PALL で 使う こと の で きる 文 を 表 2.2 に 
示し ます 。 
IIT, 手続 き の 定 言 と 関数 の 定義 の 仕 
方 を 説明 し て お きま し ょ う 。 
手続 き の 定 義 は , 
PROCEDURE 手続 き 名 (引数 1, …, 
引数 n ) : 
VAR 変数 1, …, 変数 m: 
BEGIN Х1;:-; Х2 END; 
DERT, また , 関数 の 定義 は , 
FUNCTION 関数 名 (引数 1, …, 引数 
n); 
VAR 変数 1, …, 変数 mm: 
BEGIN 文 1:…: 文 !? END; 
の 形式 で 行ない ます 。 VAR に よる 変数 宣言 
は , 局所 変数 を 宣言 する も の で す が , それ 
が 必要 な い 場 合 は 不要 で す 。 ま た 引数 が な 


文 の 種類 — & É ж 味 
代入 文 変数 一 式 式 の 値 を 変数 に 代入 する 。 
THEN や ELSE, DO な どの 次 に は 原則 的 に は ひと つの 文 
85 BPU SEND: し か こない が , ひと つ 以 上 の 文 を 書く と き 用 いる 。 
手続 き 宣言 文 PROCEDURE 名 前 (引数 並び ) ; 手続 き の 宣言 を する た め に 用 いる 。 
関数 宣言 文 FUNCTION 名 前 (引数 並び ) ; 関数 を 宣言 する た め に 用 いる 。 
RETURN 文 RETURN 式 : 式 の 値 を 関数 の 値 と し て 返す 。 
IF 条件 THEN 文 1: 条件 が 真 な ら 文 1 を 実行 する 。 
m eon e 条件 が 真 な ら 文 1 を , そう で な けれ ば 文 2 を 実行 する 。 
| REPEATX REPEAT 文 UNTIL 条件 : 条件 が 真 に な る ま て 文 を 繰り 返す 。 
WHILE 文 WHILE 条件 DO X; 条件 が 真 の 間 . 文 を 繰り 返す 。 
式 の 値 を ASCII コ ー ド と みな し て 出力 する 。 
WRITE 文 WRITE (1, ---, п); ® 式 の 代わ り に 2 つの ' で 囲ま れ た 文字 列 を ちっ て くる と , 
文字 列 を その まま 出力 する 。 


特集 MZ は コト バ の 天才 で ある 35 


い 場 合 で も (と ) は 省略 で きま せん 。 さ ら 
с, 関数 宣言 に お ける 文 は , 少な く と も ひ 
ESI, 
RETURN X ; 
の 形 の も の で な けれ ば な り ま せん 。 こ の 文 
が な いと 関数 か ら 値 を 返す こと が で きま せん 。 
も ちろ ん これ ら の 定義 で は , PASCAL の 
特徴 の ひと つ で ある 再帰 的 な 定義 を する こ 


と も で きま す 。 
( 例 ) FUNCTION KAIJO(N): 
BEGIN 


IF N«2 THEN RETURN 1 
ELSE RETURN N*KAIJO(N — 


余談 で す が , この 例 な どの よう に 関数 や 
手続 き の 本 体 が ひと つの 文 の 場合 は , BEG 
IN と END で 囲む 必要 は あり ませ ん 。 し か し , 
筆者 の 好み で BEGIN と END を わざ わき ぎ 付 
け て あり ます 。 

ө 組み 込み 関数 

PALL で 最初 か ら 定 義 き 8 れ て いる 組み 込 
み 関 数 を 表 2.3 に 示し ます 。 そ し て , これ ら 
は 式 の 中 で 使用 し ます 。 

PALL で は , 入出 力 に お いて 必要 最小 限 
の も の し か 関数 や 手続 き と し て 存在 し て い 
ませ ん (GET と WRITE だ け )。 こ の た め , 
10 進 数 の 入出 力 や 16 進 数 の 入出 力 を 行なう 


1) 関数 や 手続 き は 自分 で 定義 する 必要 が あり 
END: ます 。 こ れ ら を 定義 する こと は プロ グラ ム 
表 2.3 PALL で 使用 で きる 関数 
| 名 前 | 一般 形 | 引 数 ・ 値 
INC | INC(ZE) | 変数 の 値 を | だけ 増し て , その 変数 に 代入 し , 値 と する 。 
DEC DEC( 変 数 ) | 変数 の 値 を 1 だ け 減じ て , その 変数 に 代入 し , 値 と する 。 
| 文字 が 入力 され る まで 待ち , 押さ れ た キー の ASOII コ ー ド を 値 と する 。 エ コー 
e SEM 3 バッ ク は され な い 。 
リス ト 2 2 の 値 を 求め る プロ グラ ム 


2 UAR LNG; 

3 PROCEDURE NOVECA, B); 
4 UAR 1; 

5 BEGIN 

6 1%; 

2 WHILE I<LNG DO 

в BEGIN 

E] &CIJeBEID;IeItl; 
190 ЕМ; 

11 END; 


12 PROCEDURE 6001(6,М2; 

13 UAR n,l,Q,R,CRY; 

14 BEGIN 

15  rn*N;CRY*0;Qen^10;Ren nOD 10; 
16 I*@;neQ; 

17 WHILE IXLNG DO 

18 BEGIN 

19 ACIJeAC 1 J4R*CRY j 


20 IF AC1)>9 THEN 


21 BEGIN 

22 RCIJeALIJ-10;CRY€l; 
23 END 

24 ELSE 

25 CRY*0; 

26 Qer^z10;Ren nOD 1@;Ме#0;1#1+1; 
22 END; 

28 END; 

29 PROCEDURE CLEARCA) ; 

30 UAR 1; 

31 BEGIN 

32 1%; 

33 WHILE IXLNG DO 

34 BEGIN 

35 RCIJe0;IeI*1; 

36 END; 

37 END; 

38 PROCEDURE СОМРІ СА) ; 
39 UAR 1; 

40 BEGIN 

41 1.0; 

42 WHILE I<LNG DO 

43 BEGIN 

44 ALIJe9-ACIJ;IeI1*! ; 
45 END; 

46 END; 


47 PROCEDURE SHIFT(ñ); 
48 ЧАВ LS,Ti 

49 BEGIN 

50  I*1;S*^C0) ;a[0)«0; 
51 WHILE IXLNG DO 


52 BEGIN 

53 Те8(11;611265;6е7;16141; 
54 END; 

55 ЕнО; 


56 PROCEDURE ADDCA,B); 

57 VAR CRY,I; 

58 BEGIN 

59  CRY*8;I*0; 

ба WHILE I<LNG DO 

B1 BEGIN 

62 REIJeRCIJSBL IJ4CRY; 


63 IF ӨСІ129 THEN 

64 BEGIN 

65 CRY*1;ALIJ*ACIJ-10; 
66 END 

67 ELSE 

68 CRY*0; 

69 1«І%1; 

28 END; 

71 END; 


; 
72 PROCEDURE HULTICA,N2; 
23 VAR СКҮ, 1; 

24 BEGIN 

25 CRYe0;I*0@; 

76 WHILE IXLNG DO 


22 BEGIN 

28 R(1]*RT]*N+CRT 
29 IF АСІЈ›9 THEN 

ве BEGIN 

81 СЕТе8(11/10; 

в2 ACIJeRCII-CRYX10 ; 
вз END 

84 ELSE CRY*8; 

85 IeI+1; 

86 END; 

87 END; 

88 PROCEDURE SUB(ñ,B); 

89 BEGIN 

99 COMPL(B) ;ADDI (CB, 1) ;ADOCA, B); 
91 COHPL(B) ;ADDI(B, 1); 
92 ENO; 

93 FUNCTION GETN(); 

94 UAR Nj 

95 BEGIN 


96  N*1;nOUECA, X); 
97  nOUECB, Y) ;SHIFTCB) ;HOUECY, B); 
98 WHILE RLLNG-1] NE 9 DO 


99 BEGIN 

199 МОЧЕ CA, х) ;HOUECB, Y) ;ADDICB, N) j 
191 MULTICB,N); SUBCA,B) jNtN+1 j 
192 END; 

103 NeN-2; 


104  RDOICY,N) ;HOUECB, Y) ;HULTICB,ND ; 
105 — SUBCX,B) ;SHIFTOO ;SHIFTCXO ; 

106  RDDI(Y,N) 

102 RETURN Nj 

108 ЕМО; 


109 PROCEDURE ROOT(T) ; 

118 UAR N; 

111 BEGIN 

112 IF me THEN 

113 BEGIN 

114 N*GETNC) ;HRITECN*482 ; 
115 ROOT(CH-12; 

116 END 

117 ELSE 

118 WRITECSOD) ; 

119 END; 

120 BEGIN 

121 LNG*860 ;CLEARCX) ;CLEARCY) ; 
122  RODICX, 2) ;FOOT(S0) ; 

123 END. 
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の よい 練習 問題 に な る で し ょ う 。 


サン プル プロ グラ ム 

PALL を 使っ て 整数 の 平方 根 を 求め る プ 
ログ ラム を 作っ て み ま し た 。 方 法 は 開平 計 
算 に よっ て いま す 。 開平 計算 と は , 以下 の 
まう な デル ゴリ ズム で す 。 

а) を 整数 X の 平方 根 の 小数 点 以下 fi 
日 の 値 と し ます (a。 は azSX で ある よう な 最 
大 の 整数 で す )。 だ た と えば , X=2 な ら lai 
TROE 5 32 b с 

а,-1, a,=4, a =l, а,-4, а,=2, ··· 
の よう な ai (іс, …) は 次 の よう に し て 
組織 的 に 求め る こと が で きる の で す 。 

Ф Y-—0;i—0 
@② (Y+n)xn<X<(Y+n+1)X (n 十 1) 
と な る よう な 整数 nm に 対し て , 
аі-п;Хе-(Х-п”) X100; Y— (Y +2n) 
x10 
(3 ic—i-l;goto (2 
この と き , X や Y を 普通 の 変数 と する と , 
す で 桁 あふ れ を 起こ し て し まい ます (ai が 
ひと つ 求 まき る ご と に X は 2 桁 .Y は 1 桁 増加 
し ます か ら )。 こ の た め , X, Y は 配列 の 形 
で 表現 し , 多 倍 長 の 計算 や する こと に し ま 
す 。 こ の よう に し て 2 の 値 を 50 桁 で 求め る 
プロ グラ ム が リス ト 2 で す 。 リ スト の 中 の 
メイ ンプ ログ ラム (121--12341) С, ADD 
I(X,2 を ADDI(X,3)、 ADDI(X, 5)、… と 
変え る と J3, (5, … の 値 を 求め る こと も で 
きま す 。 ま た , 求め る 桁 数 は ROOT の 引数 
を 変え る こと で 指定 で きま す 。 こ の と き , 
LNG の 値 は その 桁 数 より 大 きく し て お く 必 
要 が あり ます 。 


ちょ っ と ひと 言 

この PALL は , メーカ ー 側 が PASCAL の 
学習 用 と 開き 直っ て いる と ころ か ら も わか 
る よう に , 始め か ら 備 わっ て いる 機能 は あ 
まり 豊富 で は あり ませ ん 。 しかし, 逆 に そ 
の シン プル さる が 魅 力 と 言え を る の で は な いで 
し ょ うか 。 命令 の 少な さき は 覚え る の に うっ 
て つけ で す 。 しかも, 関数 や 手続 き は 必要 
な だ け , あと か ら 定 義 ど きる の で すか ら 。, 
使用 し て い 〈 上 で 不便 は あま りな いで し ょ 
Эъ 

それ に し て も , 当時 の 記事 を 見 る と 「 実 
数 も 扱え る PALLII を 作成 中 」 と あり ます 
が 。 いっ だ いこ れ は どう な っ だ の で し ょ うか が 。 


< 参考 文献 > 
o 中 本 伸一 竹 部 隆司 『PASCAL 時代 が や っ 
て 来 た /』 1/0, 79 年 12 月 号 。 


° 工藤 裕司 『PALL を 解剖 する ./ ュ 
80 年 1 月 一 4 月 号 。 


1/0, 


ЖЕ 

FORM は , PALL と 同じ く ハ ドッ ソン ソ フト 
に よっ て 開発 され だ, 整数 型 Tiny FORTR 
AN で す 。 こ れ は 80 年 5 月 号 の 1/O 誌 上 で 初 
め て 発表 きれ まし た 。 

FORTRAN は , マイ ユン の 言語 と し て は 
あま り 使 われ て いま せん が , 大 型 計算 機 用 
の 言語 と し て は も っ と も ポピュラー な も の で 
す 。 し だ が っ て , アプ リ ケ ー ジ ョ ジジ フト 
も 膨大 な 量 が 存在 し て いま す 。 大学 で の プ 
ログ ラム の 教育 用 の 言語 と し て は , 決 まっ て 
FORTRAN で す (現在 で は PASCAL に 押 
され 気味 の よう な 気 も し ます が )。 こ の よう 
に 有名 な 言語 で すか ら , FORTRAN の サブ 
セッ ト が マイ コン 用 に 開発 きれ た の も 当然 
な こと で し ょ う 。 し か し , 相手 は マイ コン 
で すか ら , 機能 上 か な り の 制約 を 受け て い 
š+, この た だ ため, この FORM は FORTRAN 
と いう より も , むし ろ BASIC に 近い も の と 
な っ て いま す 。 本格 的 な FORTRAN を , と 
いう 人 に と っ て FORM は 少し も の 足り な い 
か も し れ ま せん が , FORTRAN の 気分 を 味 
わ う こと は で きる の で は な いで し ょ うか 。 

FORM で 特徴 的 な こと は , PALL が 中 間 
コー ド の イン タプ リタ で あっ た の に 対し , 
即時 実行 可能 な 780 の 機械 語 オ プ ジ ェ クト 
を 生成 する と いう 点 で し ょ う 。 こ の よう に , 
FORM は 「 本 当 の 」 コ ン パ イラ な の で す 。 

そし て , ?81 年 1 月 号 の 1 ユ プ 0 誌上 で は , Ж 
山 実 氏 に よっ て , この FORM に 実数 演算 機 
E を 付け 加え た ,FORTRAN-MZ が 発表 る 
れ ま し た 。 こ の FORTRAN-MZ は FORM を 
拡張 し た も の で すか ら , FORM の ソー スプ 
ログ ラム は , 変数 名 を すべ て 整数 型 に 変え 
る だ け で , FORTRAN-MZ 上 で 走ら せる こ 
が て きま す 。 

余談 で す が , FORM の 名 称 は ,FORTRAN 
の 名 前 が FOR mula TRAN slator (数 式 翻 
訳 ) の 略 で ある こと に ちな ん で 付け られ た だ 
も の と 思わ れ ま す 。 


エディ タ ・ シ ステ ム 関 係 
先 に 述べ まし た よう に ,FORME FORTR 
AN-MZ は ほとん ど 同 じ も の で す 。 それ で 
以後 で は , 特に 区 別 し な いと き は , FORM 
と いう 単語 は FORTRAN-MZ の こと も 意味 
し て いる と 思っ て くだ さい 。 
PALL で は PALL モ ニタ が プロ グラ ム の 


エディ ッ ト と コン パイ ル の 両方 を 行なっ て 
いま し た だ た 。 しかし, FORM は エディ イッ ト す 
る た め の モ ー ド と ユン パイ ル す る た め の モ 
ー ド に 分 か れ て いま す 。FORM 起 動 時 は , 
コン パイ ル ・ モ ー ド に な っ て いま す 。 ま ず , 
FORM の メモ リマ ッ プ を 図 3.1 に 示し て お 
а Б Эш 
e コン バイ ル ・ モ ー ド 

コン パイ ル ・ モ ー ド で 使わ れる コマ ンド 
を 表 3.1 に 示し ます 。 プ ログ ラム を 実行 する 
に は , 一 般 的 に は 

COMPIL 

RUN 
と し ます 。 しかし, ソー スプ ログ ラム が 大 
きす ぎる と メモ リエ ラー が 出る の で , この 
と き は , ソー スプ ログ ラム を 一 旦 テ ー プ "に 
セー ブ し て お いて か ら , EXEC コ ユマ ンド で 
1 プ ブロック (256 バ イト ) ず つ ュ コ ン パ イル し 
て いき ます 。 そ し て RUN コ ユマ ンド を 実行 し 
ます 。 

コン パイ ル さ れ た 機械 語 オ ブ プ ジェ クト は 

BSAVE ファ イル 名 
で カセ ッ ト テ ー プ " に セー ブ で きま す 。 これ 
は モニ タ か ら ロ ー ド する と 直接 実行 する こ 
と が で きま す 。 だ だし,FORTRAN-MZ で 
は , シス テム が メモ リ 上 に 存在 し て いな け 


表 3.1 コン パイ ラ ・ コ マン ド 


特集 クリ ー ン コン ヒュ ー タ と 言語 


АЕО TU iu i+. 

ө エディット * モ ー ド 

エディ タコ マン ド の 一 覧 表 を 表 3.2 に 示し 
ます 。 こ の コマ ンド の 機能 は , PALL と 似 か 
よっ てい ます が , P コ マン ド は な で ,。 コマ 
ンド の あと に 行 番号 (エディ タ が 付け る ) 
を 直接 書く よう に な っ て いま す 。 ま ただ, Š 
の エディ イタ も スク リー ン エ ディ ッ ト を する 
こと が て きる よう に な っ で いま す 。 

プロ グラ ム を 書く と き , 実際 の FORTR 


図 3.1 FORM の メモ リマ ッ プ 


(5 ー ル ドス ター ト ee 
ホッ トス ター ト сны) 


オプ ジェ クト ・ プ ログ ラム 


$1200 


RAMEND は 普通 $CFFF 
($2708, $27D9 番 地 を 書き 換え れ ば 変更 で きる ) 


コマ ンド -RÉ ж ж 
EDIT EDIT エディ タ ・ モ ー ド へ 移る 。 
COMPIL COMPIL メモ リ 上 の ソー スプ ログ ラム を コン パイ ル す る 。 
カセ ッ ト テ ー プ 上 の ソー スプ ログ ラム を コン パイ ル す る 。 
EXEC EXEC フ ァイル 名 ファ イル 名 は 省略 し て よい 。 
コン パイ ラ が 生成 する 機械 語 オ ブ ジ ェクト を カセ ッ ト テ ー プ に セー 
BSAVE BSAVE フ ァイル 名 ға, эке теі. | 
LIST LIST 1 行 コ ン パ イル する ご と に その 行 を 表示 させ る 。 
LISTN コン パイ ルリ スト を 表示 し な い 。 
LISTE エラ ー の ある 行 だ け を 表示 する 。 
すべ て の 出力 を プリ ンタ へ 切り 換え る 。 
LISTP (FORTRAN-MZ C, 実数 を 出力 する と き , それ は プリ ンタ へ 出力 さ 
れ な い ) 
LISTG プリ ンタ ・ モ ー ド を 解除 する 。 
RUN RUN オブ ジェ クト プロ グラ ム の 実行 。 
| BYE BYE モニ タ へ 制御 を 移す 。 
$3.2 エディ タ ・ コ マン ド 
コマ ンド - кж ж ж 
"ni : プロ グラ ム を 入力 で きる 状態 に する 。 
ソー スプ ログ ラム が 存在 する と き は その 最後 か ら イ ン サ ー ト され る 
Break B 行 番号 行 番号 で 示さ れる 行 の 前 へ 1 行 イ ン サ ー ト する 。 
List È プロ グラ ム を すべ て 表示 する 。 
L, 行 番号 行 番号 以降 の プロ グラ ム を 表示 する 。 
LP プリ ンタ ヘ へ プ ログ ラム を 出力 する 。 | 
Delete D 行 番号 行 番号 で 示さ れる 1 行 を 削除 する 。 | 
Compile ! コン パイ ラ ・ モ ー ド へ 移る 。 | 
New |> & ソー スプ ログ ラム を すべ て 削除 する 。 
カセ ッ ト テ ー プ か ら ソ ー ス プロ グラ ム を ロー ド す る 。 
neac ыз жамы ファ イル 名 は 省略 で きる 。 
カセ ッ ト テ ー プ に ソー スプ ログ ラム を セー プ ブ す る 。 
uiis зе ファ イル 名 は 省略 で きる 。 


特集 MZ は コト バ の 天才 で ある 27 


AN と FORM で は , その 形式 が 大 きく 異な 
っ て いま す 。 つま り , FORTRAN は 1 行 の 


構成 が , 
1.2 3 456 7 8 9……( 文 字 の 位置) 
xas || x 

で な けれ ば な ら な い の に 対し ,FORM で は , 
ひと っ 以上 の | x € 3 i mE 
ФЕ UmÉor&uum)| Фа 


と な っ て いて , 自由 な 形式 で ゲロ グラ ム を 
Ж さと が で きま すず 。 


文 法 
e ブ プログ ラム の 構成 
ソー スプ ログ ラム は 最初 の 行か が ら コ ユン パ 
イル る され ま す 。 したがって, 原則 的 に は , 
メイ ンプ ログ ラム が 最初 に 。 その 次 に サブ 
ルー チン が こ な け れ ば な り ま せん 。 ま が だ, 
コン パイ ラ は END と 書い て ある 行 ま で を コ 
ン パ イル し ます か ら , FORM の プロ グラ ム 
は 図 3.2 の よう な 構成 に な り ま す 。 
e 定数 ・ 変 数 
FORM が 扱う こと の で きる 数 は 10 進 数 と 
$ で 始ま る 16 進 数 で す 。 ま た 文字 定数 は 1 
文字 の 前 に を 付け て 表わし ます 。 
(ІЙ) 10, S8FFF, $0р, £A 
FORTRAN で は , これ に 加え て , 実数 弄 
の 定数 が あり ます 。 これ は , 小数 か , それ 
に EE で 示さ れる 指数 部 を 付け た も の で す 。 
(ff) 1.23,-1.2,1.23Е--01(1.23х10! 
の こと ), -2.3E-20(—2.3x10-» 
の こと ) 
変数 名 は , 1 一 4 文字 の 英字 で 始ま る 英 
数 字 の 列 で す 。 予 約 語 (関数 名 や IF, WR 
ITE な ど , 最初 か ら シ ステ ム に 定め られ て 
いる も の ) は , 変数 名 に は 使用 で どき ませ ん 。 
FORTRAN-MZ で は , LJ, K, L, M, N で 始 
£ る 変数 は 整数 型 。 他 は 実数 型 し みな し ます 。 
ө 配列 
配列 は 次 の よう な DIMENSION 文 に よっ 
СЕН GS Te 
DIMENSION 配列 名 1( 大 きる ), …, 
配列 名 n( 大 きる ) 


図 3.2 FORM の プロ グラ ム の 構成 


メイ ン ル ー チ ン 
STOP 
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この と き , 配列 名 は 変数 名 と 同じ で す 。 た だ 
EX, 
DIMENSION А (10) 
と 宣言 すれ ば , A(1) 一 A(10) で 示さ れる 
10 個 の 領域 が 確保 され ます 。 なお, 配列 は 
2 次 元 の も の も 宣言 でき ます 。 こ の と き は , 
DIMENSION А (10, 20) 
の よう に し ます 。 
e x 
FORM で は 論理 式 は あり ませ ん (も ちろ 
А, 実際 の FORTRAN で は し っ か り と 存在 
し て いま す )。 し た が っ て , 式 は 算術 式 だ け 
C, それ ら に 使わ れる 演算 子 に は 次 の よう 
な も の が あり ます 。 


ж (か け 算 ) 
/ (わり算) 
これ に 加え て , FORTRAN-MZ に は 次 の も 
の が あり ます 。 
t (べき 乗 ) 
演算 子 の 優先 順位 は , 
ж + 
t = r - 0 
の よう に な っ て いま す 。 ま た だ , 同じ 優先 順 
位 の も の は 左 か ら 順 に 評価 され て いき ます 。 
e x 
FORM の 文 の 一 覧 表 を 表 3.3 に 示し ます 。 
この 中 で 特色 が ある の は USR 文 で す 。 機械 
落 サ プル ー チ シ を コー ル す る と き に 。 ФЕ 


+ CUR) ジス タ の 値 を メモ リ 上 の アド レス を 介し て 
— (ひき 算 ) セッ ト で きる よう に な っ て いま す 。 各 レジ ス 
表 3.3 FORM の 文 (実行 文 )。 非 実行 文 は , DIMENSION 文 と END 行 の み 。 
文 の 種類 | ー KR ¥ в ж 
代入 分 変数 = 式 式 の 値 を 変数 や 配列 に 代入 する 。 
GOTO 文 GOTO XFS 指定 し た 文 番号 (ユー ザー が 付け た も の ) ヘ へ ジャ ンプ する 。 
IF 文 IF ( 式 ) 文 番号 1, 文 番号 2, 文 番 号 3 式 の 値 が 負 な ら 文 番号 1. ゼロ な ら 文 番号 2, 正 な ら 文 番号 
3 へ ジャ ンプ する 。 文 番号 を 省略 する と 次 の 行 へ 行く 。 
DO 文 DO XFS 変数 = 初期 値 , 終 値 以下 の 文 と , 文 番号 で 示さ れる 文 の 間 を , 変数 の 値 を 初期 
値 か ら 1 ず つ 増 加 し て いき , 終値 を 越え る まで 繰り 返す 。 
DO 文 番号 変数 = 初期 値 , 終値 , 増 分 | 変数 の 増分 が 1 以外 の と き の DO 文 。 
CONTINUE 文 CONTINUE 何 も し な い 。 
CALL 文 CALL XFS 指定 し た 文 番号 か ら 書 か れ て いる サ プ ル ー チ ン を コー ル す る 。 
RETRN 文 RETURN サブ ルー チン か ら 戻 る 。 
PAUSE 文 PAUSE 数 字 数 字 を 出力 し て , プロ グラ ム を 一 時 停止 する 。 
数 字 を 省略 する と , 0 が 設定 され る 。 
STOPX STOP 数 字 数 字 を 出力 し て , プロ グラ ム の 実行 を や め る 。 
BREAK 文 BREAK | _BREAK | キー が 押さ れ て いる と 実行 を や め る 。 
USR 文 USR( 式 ) 式 で 指定 され る 番地 の 機械 語 サ ブル ー チ ン を コー ル す る 。 
機械 語文 $SML_ 機械 語 1,…, 機械 語 n プロ グラ ム 中 に 直接 機械 語 を 書き 込む 。 
SETG 文 SETG( 式 1, 式 2) X, Y 座 標 が 式 1, 式 2 で 与え られ る 画面 上 の 座標 を セッ ト す る 。 
RESG 文 RESG( 式 1, 式 2) 画面 上 の 指定 座標 を リセ ッ ト す る 。 
READ (ER1, …, 要素 n) 要素 で 指定 され る 変数 に 値 を 入力 する 。 1 変数 分 入力 す 
— ч る ご と に [CR] キ ー を 押す 。 
要素 の 形 > 
変数 . (また は 変数 . ) 10 進 数 入力 。 
変数 .B 16 進 数 入力 。 
変数 .A1 | 文字 入力 。 
変数 . A2 2 文字 入力 。 
“XFA” 文字 列 を 出力 する 。 
РА 改行 する 。 
変数 .E(FORHTRAN-MZ の み ) 実数 入力 。 
WRITE( 要 素 1,…, 要素 n) 要素 で 指定 され る 式 の 値 を 出力 する 。 
WRITE 文 
要素 の 形 > 
式 10 進 左 詰め 出力 。 
式 . Tn n 桁 0 進 左 詰め 出力 。 
=. Вт m 桁 16 進 出力 。m=2,4 
式 .X 式 の 値 だ け ス ペー ス を 出力 。 
式 .Am m 字 の 文字 を 出力 。m=1.2 
式 .V 式 の 値 で 示さ れる Y 座 標 へ カー ソル を 移動 する 。 
式 .H 式 の 値 で 示さ れる X 座 標 へ カー ソル を 移動 する 。 
“XFA” 文字 列 の 出力 。 
P d 改行 する 。 
xt. E(FORTRAN-MZO &) 式 の 値 の E 型 式 出力 。 


タ の アド レス は 次 の よう に な っ て いま す 。 
AF- $ 1000 
ВС $ 1002 
рЕ $ 1004 
НІ. $ 1006 
また , DIMENSION X kt END ír CX 
号 を 付け る こと は で きま せん 。 
マル チ ス テー トメ ント は あり ませ ん 。 こ 


の た め , 1 行 に つき , ひと つの 文 を 書く こ 
と し か で きま せ ぜん 。 マ ル チ ス テー トメ ント 
は イン タプ リタ の 実行 速度 を 上 げ る た め の 
役割 を する も の で すか ら , コン パイ ラ 言 語 
に と っ て は 不要 で し ょ う 。 も むし みろ 見 や すい ぃ 
プロ グラ ム を 書く こと が で きま す 。 
@ 関数 

FORM や FORTRAN-MZ の 組み 込み 関数 


表 3.4 FORM,FORTRAN-MZ の 組み 込み 関数 


関数 名 一 般 形 (FORM) 一 般 形 (FORTRAN-MZ) 引 数 ・ 値 
MEM MEM( 式 ) MEM( 式 ) 式 で 示さ れる 番地 の 内 容 を 値 と する 。 
IOC (3) IOC( 式 ) 式 で 示さ れる ポー ト の 内 容 を 値 と する 。 
LOW( 式 ) LOW( 式 ) 式 の 下位 8 ビッ ト の 値 を 返す 。 
GET キー が 押さ れ て いれ ば , その ASCII コ ー ド , 
押さ れ て いな けれ ば , ゼロ を 返す 。 
MOD( 式 1, 式 2) MOD( 式 1, 式 2) 式 1 の 値 を 式 2 の 値 で 割っ た と き の 余り を 値 
と する 。 
ABS( 式 ) IABS( 式 ) | 式 の 値 の 絶対 値 。 
cu ABS (st) ЕЕ ТІЛТІГІСІТІ 
AND (st) | IRND (st) 0— (st — 1) の 値 の 乱数 。 
SIGN( 式 1, X2) ISIGN( 式 1. 式 2) 式 2 の 符号 が 付い た 式 1 を 値 と する 。 
ーー SQRT( 式 ) 式 の 値 の 平方 根 (実数 型 )。 
ーー SIN( 式 ) ラジ アン 単位 の 式 に 対す る 正弦 (実数 型 )。 
ーー COS( 式 ) ラジ アン 単位 の 式 に 対す る 余弦 (実数 型 )。 
ーー TAN( 式 ) ラジ アン 単位 の 式 に 対す る 正 接 ( 実 数 型 )。 
— EXP (sk) 自然 対数 の 底 e の べき 乗 (実数 型 )。 
ーー ALOG( 式 ) 式 の 値 の 自然 対数 (実数 型 )。 
ーー ATAN( 式 ) 逆 正 接 (実数 型 )。 
— FLOAT (X) 式 の 値 の 実数 化 ( 整 数 一 実数 )。 
ーー IFIX (5%) 式 の 値 の 整数 化 (実数 一 整数 )。 
ーー ТОА (21, 32) 式 1 と 式 2 の ビッ ト ご と の OR。 
--- IAND (1, 5&2) 式 1 と 式 2 の ビッ ト ご と の AND。 
EXCLUSIVE ОН > IXOR( 式 1, 式 2) 式 1 と 式 2 の ビッ ト ご と の 排他 的 OR。 


(GE) 表 の 中 の 実数 型 た いう の は 引数 一 値 の 変換 が 実数 一 実数 の も の を 指す 。 何 も 書い て な いも の は 整数 一 整数 の 変換 。 


リス ト 3 Romberg 積 分 を 計算 する プロ グラ ム 


FORTRAN-MZ に よる も の 。 


e: CALL 3999 


1: X1=9.9 

2: XF=1.9 

3: H=1.0 

4: Р-(ХҒ-Х12/Н 

5: N-IFIXCP) 

6: MRITE( ン "NO. TRAPEZOIDAL 
ROMBERG" 77) 

2: CALL теге 

8: 50-5 

9: 00 1 к-0,9 

18 WRITECK. 11,2. X, S8. E) 
11: N=2*N 

12 н=@.5зн 

13: CALL теве 

14 51-5 

15: 5-(4,0%51-50)/3.0 
16: WRITEC2.X,S.E^) 
12 50-51 

18 1 CONTINUE 

19 CALL 4000 

28 STOP 

21: 1800 S=9.9 

22: X8-XI 

23: DO 18 I=1,N 

24: х=х@ 

25: CRLL 2000 

26: Fe-F 

22: X1=X9+H 

28: X=X1 

29: CALL 2000 

38: Fl=F 


31: X9=X1 

32: S=S+9.5*(F9+F 1 )*H ロ 
33: 18 CONTINUE 

34: RETURN 

35: 2008 F=EXP(X) 

36: RETURN 

37: 3999 зт. Ғ5,05 
38: 811. 3E,00,1!1!,00,00 
39: +. CD,33,00 
40: зї. DF! 
41: RETURN 

42: 4008 $ML Ғ5,05 
43: зп. CD, 38, 99 
44: $HL 7A 

45: CALL 4010 
46: % 7A 

42: CRLL 4020 
48: эг. 28 

49: CALL 4010 
58: *nL 78 

51: CALL 4020 
52: эги. CD,96, 99 
53: SNL D!,F! 
54: RETURN 


55: 4010 $HL 1F,1F, 1F, 1F 

56: 4020 өлі CD,06,03,CD, 12, 08 
52: РЕТІ,2М 

58: END 


特集 クリ ー ン コン ヒュー タ と 言語 


を 表 3.4 に 示し ます 。 こ の うち MEM ОС 
は 代入 文 の = の 右側 に 書く こと が で きま す 。 


MEM( 式 1) = 式 2 (メモ リ へ の アク セス ) 
IOC ( 式 1) = 式 2 (I/O ポ ー ト へ の アク 
tA) 


は それ ぞ れ , 式 1 で 示さ れる 番地 や 1/0 ポ 
ー ト へ , 式 2 の 値 の 下位 8 ビット を 書き 込 
む 機 能 が あり ます 。 


サン プル プロ グラ ム 

サン プル プロ グラ ム と し て , FORTRAN 
-MZ の 実数 演算 機能 を 使っ た , 数 値 積 分 を 
行なう プロ グラ ム を 考え て み ま し た 。 を その 
原理 は , 台形 公式 と 呼ば れ て いる も っ と も 
単純 な も の で す 。 こ れ は , 関数 f(x) が 与え 
られ た と き 。 その 積分 区 間 [xi, xr] を N 等 
分 し て , 各々 の 区 間 の 面積 を 台形 の 面積 で 
近似 し た も の の 総和 を 積分 の 値 と する も の 
で す ( 図 3.3 参 照 )。 

台形 公式 で 積分 の 近似 値 を 得 た と き , 誤 
差 は Euler-Maclaurin の 公式 で 知る こと が で 
きま す 。 すなわち , 積分 区 間 の きざみ 幅 を 


図 3.3 台形 公式 に よる 積分 の 近似 値 


xf 
Т  f(x)dx=S,+S;+:---+SN 
хі 


HuBASIC に よる も の 。 


1902 TIHE*="99:99:99" 
тете Xi=@ 

1929 XF=1 

1030 H=1 

1040 NeCXF-XI27H 
1959 LPRINT "NO. 
ERG" iCHR を (13) 
1969 GOSUB 2999 
18070 52-5 

1880 FOR: K=@ TO 9 
1098 LPRINT К;ТАВС5) ;50;ТАВС212; 
1100 N=2#N 

1118 H=.S#H 

1128 GOSUB 2008 

1138 51=5 

1148 S-(4XS1-S0)73 

1158 LPRINT S 

1168 52-51 

1178 NEXT K 

1188 ULPRINT: TIMES 

1198 STOP 

2000 5-8 

2018 хӘзхі 

2928 FOR 1-1 TO N 

2030 х-хә 

2048 GOSUB 3999 

2050 Fe=F 

2060 хі-хФжн 

2070 х-хі 

2088 GOSUB 3999 

2090 Fi-F 

2100 хй=х! 

2118  S=S+.5*(F9+F1)*H 

2120 NEXT I 

2138 RETURN 

3999 F-EXPOO 

3919 RETURN 


TRAPEZOIDAL ROMB 


特集 MZ は コト バ の 天才 で ある 39 


хк Xi 


h (h= N ) と すれ ば , 誤差 EE(h) は , 
E (h) =a,h? +a,h’ +a,h +-+- 

と な り ま す 。 し た が っ て 台形 公式 に よる 値 
を I(h) と すれ ば , 

Ih) = f T'tG)dx-ca hah 
box. CODES, 

ода + 41C) —1®)) +a, 

hî + «° 

が 成り 立ち ます か ら , ТО), IIH を 求め 
Ce (41 (4)- 1 (0) を 新しい 積分 値 と すれ 
ば 誤差 を 減ら すこ と が で きま す 。 こ の よう 
な 積分 の や り 方 は Romberg 積 分 と 呼ば れ て 
いま す 。 リ スト 3 は , この Romberg 積 分 を 
2000 の 文 番号 か ら 始 まる 関数 値 を 求め る サ 
プ ブルー チン に 対し て 計算 する プロ グラ ム で 
+, なお, 30004 F, 4000 番 以下 は それ 
£n, 内 蔵 タ イマ を も セット , 表示 する サブ 
ルー チン で す 。 ま た だ た , FORTRAN-MZ が , 
いか に BASIC に 近い か を 知る た め , それ に 
対応 する Hu-BASIC の プロ グラ ム も ぅ 示し て 
あり ます 。 両者 の プロ グラ ム で すべ て の 計 
算 が 終わ る まで (きざみ 幅 を 半分 ずつ に し 
て いっ て 10 回 分 Romberg 積 分 を し て いる ) 
の 時 間 を 比べ る と, FORTRAN-MZ が 5 分 
32 秒 , Hu-BASIC が 3 分 で す 。 こ の 例 で は , 
FORTRAN-MZ が いか に も 遅い よう に 思わ 
れ ま す が , これ は EXP(X) の 計算 の 能率 が 
悪い た め と 思わ れ ま す 。 た だ た めし に , 積分 す 
る 関数 を 。 X. XX. X*£ X; СЕТ 
L, それ ぞ れ , 24%}, 38 秒 , 47 秒 と , Hu- 
BASIC で 同じ こと を や ら せ る 場合 の 2 一 3 
倍 の スピ ー ド で し た 。 これ か ら 見 て も FOR 
TRAN-MZ の 高速 えき さがわ かり ま す 。 コンパ 
イラ が イン タプ リタ より 速い の は 当然 で あ 
っ て ほし いも の で すね 。 


ちょ っ と ひと 言 

現在 , JIS で 決め られ て いる FORTRAN 
の 標準 は FORTRAN77 で す が , FORM は , 
ひと 昔 前 の JIS の 標準 の うち , 水準 3000 と 
いう 最低 レベ ル の も の あたり を も と に し て 
いる よう で す 。 計算 型 の IF 文 な ど は 生き た 
化石 と し か 言 を ませ ん 。 それに , メモ リ БОИ] 
題 か ら , SUBROUTINE X»? FUNCTION 
文 を な くし , 引数 に よる 値 の 受け 渡し を 不 
可能 に し た 点 な ども , 言語 の 仕様 どけ の 面 
か ら 見 れ ば , PALL か ら 退 化し て し まっ た 
よう に 思 を ます 。 現在 に お いて FORM の 価 
値 を 見 出 を うと する な ら , 高速 な ゲー ム を 
機械 語 より も 容易 に 開発 で きる と いう こと 
ER EE bE 3 
< 参考 文献 > = 中 本 伸一 他 
80-55-9852 ЖЕЖ 
-MZ; VO 81 年 1 月 号 。 


"FORM; I/O 
FORTRAN 


40  onwz 19845. 


概 = 

microPASCAL (以後 PASCAL と 書き 
ます ) は , 丸山 定信 氏 が 8080 用 に 開発 し た 
Tiny PASCAL で す 。 そ の ソー スリ スト は 
80 年 の ASCII 誌 。 1 月 号 , 2 月 号 に アモ ン 
プリ 言語 の 形 で 発表 きれ まし た だ た 。 これ は 。 
PASCAL の 他 機 種 へ の 移植 を 積極 的 に 促 
し た も の で , MZ-80 に は , 辻田 政広 氏 に よ 
っ て 移植 きれ まし た 。 そ れ は ,80 年 の ASCII 
誌 6 月 号 で 発表 きれ て いま す 。 

PASCAL は , PALL と 同じ く , ディス 
ク を 使わ ず に 少量 の メモ リ で PASCAL を 走 
ら せ る こと を 目的 と し て いま す 。 こ の た め , 
標準 PASCAL と 比べ て , か な り 機 能 が 縮小 
され て いる と いう 点 は PALL と 変わ りあ り 
ませ ん 。 し か し , その 機能 は PALL よ り は 
СЕС САТ, BESE, и 
PASCAL で は , 数 値 の 入出 力 , プリ ンタ へ 
の 出力 が で きる よう に な っ て いま す 。 それ 
に 付け 加え て , 機械 語 し の リン ク が 容易 に 
で きる よう な 配慮 (変数 の 番地 を 知る こと 
が で きる , 機械 語 サ ブルー チン を 呼ぶ と き 。 
レジ スタ の 値 を 簡単 に 設定 びき る な ど ) も 
され て いま す 。 だ が だ, 不平 を 言う と すれ ば 
ソー スプ ログ ラム の エディ ッ ト 時 に , ス クリ 
ー ン エディ ッ ト が で き な い と いう 点 で し ょ う 。 

PASCAL は , チ ュー リッ ヒ の 連邦 工科 大 
表 4.1 


学 の N.Wirth 教 授 に よっ て 考案 る きれ た プロ 
グラ ミン グ の 教育 用 言語 で す 。 し か し , W 
在 に お いて は , 単に 教育 用 に と ど ま ら ず , 
マイ クロ プロ セッ サ の シス テム 開発 な どの 
分 野 で も 多く 使わ れ て いる み だ たい で す 。 こ 
れ は , ブロ グラ ム の 論理 構造 が 明確 で ある 
た め , 読み や すく , 理解 し や すい プロ グラ 
ム を 書く こと が で きる か ら に 違い あり ませ 
ん 。PASCAL の 和 需要 は これ か ら も どん どん 
ERLT SETLI; 

と ころ で , PASCAL と は 最初 の 計算 機 を 
発明 し た フラ ンス の 数 学者 B.Pascal に ちな 
ん で 名 付け られ た も の で す 。 


エディ タ ・ シ ステ ム 関 係 

PASCAL も 他 の 言語 と 同じ く シ ステ ム 
内 に エディ タ を 備え を て いま す 。 これ は , 2 
イン ボ ポイ ジ タ に よっ て ソー ス デ ログ ラム を 
作成 する 完全 な ライ ン エ ディ タ で す 。 を の 
RD, スク リー ン エ ディ ッ ト に 慣れ て いる 
人 に と っ て は 少々 扱い に くい も の で ある か 
も し れ ま せん 。 こ の PASCAL が 好き に な 
る か どう か は , この エディ タ を 使い こなす 
こと が で きる が だ うか と いう こと に か が か っ 
て いる と いっ て も 過言 で は な いで し ょ Jo 
表 4.1 に エディ タ と シス テム 関係 の コマ ンド 
を 示し て お きま す 。 ま た , PASCAL-MZ の 
メモ リマ ッ プ は 図 4.1 の よう に な っ て いま す 。 

IIT, ブロ グラ ム の 作り 方 の 手順 を 簡 
単に 説明 し て お きま す 。 一 般 的 に は , Ba 
マン ド を 入力 する こと で プロ グラ ム を 作り 
始め る こと が で きま す 。 こ れ は PALL や FO 
RM の Insert コマ ンド に 相当 し ます 。 そして, 


zPASCAL の エディ タ ・ シ ステ ムコ マン ド 


$ Ф | 一 般 形 意 味 
| Bottom | в ポイ ンタ を プロ グラ ム の 最後 に ちっ て いき 挿入 を 続け る 。 
Delete | D 行 数 ポイ ンタ の 指す 行か ら , 行 数 で 指定 され る だ け の 行 を 削除 する 。 
Find |  『 文 字 列 指定 され た 文字 列 で 始ま る 行 に ポイ ンタ を セッ ト す る 。 
Insert І ポイ ンタ の 指す 行 と その 前 の 行 の 間 に 複 数 行 を 挿入 する 。 
1 文字 列 指定 され た 文字 列 を , ポイ ンタ の ひと つ 前 の 行 に 挿入 する 。 
Last LTA ポイ ンタ を, 指定 する 行 数 だ け 上 の 行 に 移す 。 
Next N 行 数 ポイ ンタ を , 指定 する 行 数 だ け 下 の 行 に 移す 。 
p Print P 行 数 ポイ ンタ の 指す 行か ら 指定 し た 行 数 だ け の リス ト を 出し て , ポイ ンタ を 最 
後に 印刷 し た 行 へ 移す 。 
Hard copy H 行 数 P コ マン ド と 同じ だ が , リス ト の 出力 が プリ ンタ へ に な る 。 
Retype R 文 字 列 ポイ ンタ の 指す 行 を 指定 する 文字 列 で 置き 換え る 。 
Top T 行 数 ポイ ンタ を ブロ グラ ム の 先頭 か ら , 指定 され る 行 数 だ け 下 の 行 ヘ セッ ト す | 
る 。 
Append A | カセ ッ ト テ ー プ ブ から, ソー スプ ログラム を 読み 込み 。 現在 の プロ グラ ム の 
最後 ヘア ベン ド す る 。 
Save S ソー スプ ログ ラム を カセ ッ ト テ ー ブ ヘ セー プ ブ す る 。 
Go G/ ソー スプ ログ ラム を 実行 する 。 
Kill KZ ソー スプ ログ ラム を すべ て 抹消 する 。 
Quit Q^ モニ タ へ 制御 を 移す 。 
@ ファ イル 領域 の 残り バイ ト 数 を 10 進 数 で 表示 する 。 


Memory 


End memory 


定 する 。 


使用 メモ リ の アド レス の 終わ り (より 1 だ け 大 きい アド レス ) を 16 進 数 で 指 


この エディ イッ トモ ー ド か ら 抜 ける と き は 
[SHIFT |+[ BREAK| に より ます 。 こ れ で 
間違い な く プ ログ ラム を 作る こと が で きれ 
ば よい の で す が , 入力 ミス を し な いで すむ 
こと は 季 に し か あり ませ ん 。 そ を そこで,。 [a 
マン ド と R コ マン ド を 使っ て プロ グラ ム の 
修正 を する 段階 し な る わけ で す 。 

I コマ ンド は , 現在 ライ ン ボ ポイ ンタ が 指 
Tirk, その ひと つ 前 の 行 の 間 に 、 プ ログ 
ラム を 1 行 以上 挿入 する と き に 使い ます 。 
複数 行 を 一 度 に 挿入 びき る 点 は , PALL や 
FORM の Break ユマ ンド と 比べ る と, 非常 
に 便利 な こと と 思わ れ ま す 。 

R コ マン ド は , ライ ン ポ イン タ が 指し て 
いる 行 を , R の 右 に 続く 文字 列 と 置き 換え 
る も の で す 。 これ は , 1 行 の み を 修正 する 
DEPRI T: FLT, SOLIE Z, 
スク リー ン エ ディ イット が で きた だ たら, と 思わ 
ず に は いら れ な い の で す が , 他人 の 作っ た 
シス テム に 文 旬 を 言っ て も し か だ た あり ませ 
Jes し が もし 。 $093 4494-0, Suy 
ラム の セー ブ 。 ロー ド , プリ ンタ へ の リス 
ト 出 力 な ど ひ と 通り の 機能 が 備わっ て いま 
すか ら , 慣れ て し まえ ぇ ば 何 の 問 題 も な く な 
る し よう 。 


文 ж 

ө プロ グラ ム の 構成 

PASCAL の プロ グラ ム は , 図 4.2 の よう 
に な っ て いま す 。 ni, PALL の ピロ グ 
ラム 構成 と まっ た 〈 く 同じ に な っ て いま す 。 
e 定数 ・ 変 数 

他 の ほとん どの 小言 語 と 同じ く , „PAS 
CAL は 整数 型 言 語 で す 。 この た め , 使用 る 
れる 定数 は , 10 進 数 , 16 進 数 、 1 文字 で す 。 
そし て , 16 進 数 は 前 に $ を 付け て , 文字 定 
数 は 1 文字 も * また は "で 囲む こと で 表 わ 
すさ と が で きま す 。 

(fl) 1234, $ЕЕ, $12A0, “А”, “В” 

変数 名 は , 英字 で 始ま る 英 数 字 の 列 で す 。 


図 4.1 PASCAL の メモ リマ ッ プ 
(кез ドス ター ト rl 


ホッ トス ター ト 5122С 


$1200 
イン タプ リタ 


$26DB - 
ボイン タ ・ テ ー プ ブル 


変数 を 使う た め に は , あら か じ め 
VAR 変数 名 1, …, 変数 名 n: 
と プログ ラム の 頭 部 で 宣言 し て お 必要 が 
あり ます 。 こ の 変数 は , すべ て の 手続 き や 
関数 内 で 共通 に 利用 で きる 大 域 変数 に な り 
ます 。 特 定 の 手続 き や 関 数 の 中 で の み 有 効 
な 局所 変数 は , その 手続 き や 関 数 の 宣言 と 
本 体 の 間 に , 上 記 の よう な VAR 文 を 入れ る 
こと で 宣言 する こと が で きま す 。 
ө 配列 
配列 の 宣言 は 。 プロ グラ ム の 先頭 で , 
ARRAY 配列 名 1[ 大 きき さ 1], °", 
配列 名 n[ 大 き さ る nl: 
に よっ て 宣言 し ます 。 配列 名 は 変数 名 と 同 
ビ 規 則 で 付け ます 。 ま だ た 配列 は 次 元 の み 
し か 許 き れ て いま せん 。 
e 手続 き ・ 関 数 の 宣言 
PALL に お いて , 手 続き や 関数 が ,PROC 
EDURE 文 や FUNCTION 文 で 定義 きれ た よ 
J に, PASCAL で は , それ ら を PROC 文 
や FUNC 文 に よっ て 定義 し ます 。 それら の 
形式 は , 
PROC 
VAR 
Ж 
FUNC 
VAR 
X5 
と な り ま す 。PALL と 定義 の 仕方 が 似 て い 
ます が , 決定 的 な 違い は , 引数 が 存在 し な 
い 場 合 は (…) の 部 分 を 省く と いう こと で す 。 
つま り , 定義 の 最初 が , 
PROC 手続 き 名 : 
と な り ま す 。 こ うい うと ころ は 標準 PASC 
AL を 真似 て ある よう で す 。 また , 局所 変数 
が 不要 な と き は , VAR 文 も 必要 あり ませ ん 。 
文 の と ころ に は 。 ひと つの 文 し か 書く こと 
が で きま せん 。 複数 の 文 を 書く と き は , В 
EGIN と END で 囲ま れる 複合 文 を 使い ます 。 
関数 は 値 を 返さ ね ば な り ま せん 。 PALL 


続き 名 (引数 1, …, 引数 ) : 
局所 変数 1, …, 局所 変数 m : 


関数 名 (引数 1,…, 引数 1) ; 
局所 変数 1, …。 局所 変数 m ; 


図 4.2 PASCAL の プロ グラ ム 構 成 


大 域 変 数 宣言 


手続 き ・ 関 数 宣言 
手続 き ・ 関 数 宣言 


BEGIN 


メイ ンプ ログ ラム 


END. 


特集 クリ ー ン コン ヒュ ー タ と 言語 


で は , これ を RETURN 文 に よっ て いま し た 
23, PASCAL で は , FORTRAN (FORT 
RAN-MZ で は な い ) や 標準 PASCAL と 同 
UC, 関数 名 に 値 を 代入 する と いう 形 関 
数 か ら の 値 を 返し ます 。 こ の た め , 関数 定 
義 の 本 体 に は , 

関数 名 : = 式 : 
と いう 代入 文 が 少な く て と も ひと つ 必 要 で す 。 
し か し , RETURN 文 と は 違っ て , この 代入 
文 が 実行 され る と 直ちに 関数 か ら の 値 が 返 
っ て くる わけ で は な く , 本 体 が 終わ っ た と 
5, 最後 に 関数 名 に 代入 きれ た 値 が 関数 の 
値 し な る の で , この こと は 注意 し て お か な 
けれ ば な り ま せん 。 


手続 き , 関数 と も 再帰 的 な 定義 が で きる 
こと は , この 種 の 言語 で は 当然 で す 。 


e = 

式 は 定数 や 変数 を 演算 子 で つない だ も の 
で す 。 こ れ に つい て 説明 は いら な いで し ょ 
う 。PASCAL で は , 以下 の よう に 多く の 
演算 子 を 使う こと が で きま す 。 
° 算術 演算 子 


+ (EUR) 

ー (ひき 算 ) 

ж (か け 算 ) 

/ (わり算 の 商 ) 
DIV (わり 算 の 商 
MOD (わり算 の 余り ) 


° 比較 演算 子 
>- (大 きい か 等 し い ) 
> (Жам) 
= (等しい) 
% (等 し く て な い ) 
<- (小さ いか 等 し い ) 
< (小さ い ) 
° 論理 演算 子 
OR (論理 和 ) 
AND (論理 積 ) 
XOR (排他 的 論理 和 ) 
өсу 
表 4.2 に , uPASCAL で 使用 で きる 文 の 
- 覧 表 を 示し ます 。 を その 中 で も 特徴 的 な の 
が , 機械 語 サ ブルー チン を 呼ぶ た め の CA 
LLXTL ЕЭ. ЖИЕ k SEHLEN 
スタ DE レジ スタ の 値 を 代入 文 で 設定 で き 
る よう に な っ て いま す 。 
と ころ で , PROC や FUNC に よっ て 定義 
され た 手続 き は , 
手続 き 名 ( 式 1.…,), 本 | 数 を 持つ も の | 
手続 き 名 : 語数 を 持た な な いも の | 
変数 : = 関数 名 ( 式 1, …) : 提 | 数 を 持つ も の ! 
変数 : 三 関数 名 : 数 を 持た な いも ちの} 
な ど と し て 使用 し ます 。 


特集 MZ は コト バ の 天才 で ある 41 


表 4.2 PASCAL で 使わ れる 文 


Ф 組み 込み 関数 


文 の 種類 ー 形 意 味 PASCAL の 組み 込み 関数 は 表 4.3 の よ 
RAX 変数 := 式 : 変数 に 式 の 値 を 代入 する 。 うな も の が あり ます 。 
READ 文 READ( 変 数 , …) : 数 値 を キー ボー ド か ら 変 数 に 入力 する 。 
WRITE 文 WRITE (要素 , …) : 要素 で 示さ れる 文字 列 。 数 値 を 出力 する 。 
WRITE # (要素 , …) ; | WRITE の 出力 が プリ ンタ へ され る 。 表 4.3 /PASCAL の 組み 込み 関数 
要素 の 種類 > 
“BF 引 数 ・ 値 
A ADEA SE, RND( 式 ) | 1 一 式 の 間 の 乱数 を 値 と する 
式 1: 式 2  : 式 1 の 値 を 式 2 の 桁 数 で 右 詰め 出力 。 = 
Edi кене ABS( 式 ) | 式 の 絶対 値 を 値 と する 。 
ү ・ 改行 。 INP( 式 ) 式 で 示さ れる 入力 ポー ト か ら 1 バ イト 
1 入力 する 。 
PUT 文 ] PUT (要素 , …) : 要素 が 文字 列 の と き は WRITE に 同じ 。 キー が 押さ れ て いれ ば , その キー の ASCII 
要素 が 式 な ら 下位 バイ ト を ASCII コ ー ド と みて 出力 する 。 コー ド , 押さ れ て な けれ ば 0 が 値 と な る 。 
PUT# (要素 , …) : PUT の 出力 が プリ ンタ へ され る 。 PEEK( 式 ) 式 で 示さ れる 番地 の 内 容 を 値 と する 。 
[ 複合 文 BEGIN 文 1:…: 文 n END | 複数 の 文 を ひと つの 文 と みな す 。 ADRES( 変 数 ) | 変数 の アド レス を 値 と する 。 
IF X IF 式 THEN 文 : 式 の 値 が 真 (0 以外 ) な ら 文 を 実行 する 。 INC( 変 数 ) 変数 の 値 を 1 だ け 増 加 さ せ て , 値 と する 。 
IF 式 THEN 文 1 式 の 値 が 真 (0 以外 ) な ら 文 1 を , そう で な けれ ば 文 2 を 実行 する 。 DEC( 変 数 ) | 変数 の 値 を 1 だ け 減少 させ て , 値 と する 。 
ELSE 文 2 : 
WHILEX WHILE st DO X; 式 が 真 (0 以 外 ) の 間 だ け 文 を 実行 する 。 図 4.3 入力 デー タ (EM) を 整理 し て 出力 
REPEATX | REPEAT 文 1:…: 文 n UNTIL Ж; | 式 が 真 (0 以 外 ) に な る まで REPEAT と UNTIL の 間 を 実行 する 。 ( 下 側 ) し た も の 
| (な お , この リス ト は , SORT の 前 に , 一 度 0UTTBL を 実行 
FOR 文 FOR 変数 := 式 1 TO 式 2 変数 の 値 を 式 1 か ら 1 ず つ 増 し て いき , 式 2 に な る まで , 文 を 繰り させ る こと で 打ち 出し た )。 
DO 文 : 返す 。 
FORE: 1 DOWN Ж? | 増分 が ー1 で ある よう な FOR 文 。 
注釈 文 % 注釈 % % で 囲ま れ た 部 分 は , 読み と ば され る 。 ABAYO НАОКО Kk. С 
STOP 文 STOP: プロ グラ ム の 実行 を や め る 。 нс ИДЕН... Зар 1. 7 
"=. Я > ー ト (ー TM SHIAWASE. SHIBAI JUNKO S. SU-6319 
OUTX OUT (&&1) : = 式 2: 式 1 で 示さ れる 出力 ポー ト に ., 式 2 の 下位 バイ ト を 出力 する 。 TE тыла. ET коа 
POKE 文 POKE( 式 1) : = 式 2: 式 1 で 示さ れる 番地 に , 式 2 の 下位 バイ ト を 書き 込む 。 KONOSORA. о. TOBETARA TOKIKO K. DKo-1928 
КАМОМЕ . Ма. КАПОМЕ NAOKO к C-91 
CALL 文 CALL( 式 ) ; 式 で 示さ れる 番地 の 機械 語 サ ブ プルー チン を 呼ぶ 。 MADOGARASU NAOKO K.  C-104 
САЦ (%):-Жн; HL レジ スタ に 式 H の 値 を 代入 し て 機械 語 サ ブル ー チ ン を 呼 н E ола. Т 
CALL (5): = зн, Жо: ts ent... RUMIKO K. SH96-1 
HITORIBOCCHIDE.ODORASETE NAOKO K. C-1S8 
HL レジ スタ に 式 H の 値 ,.DE レ ジス タ に 式 D の 値 を 代入 し て 機械 PIERROT JINPACHI N. С-153 
ー チ ・ а KESYOU JUNKO S. 50-7075 
語 サ ブル ー チ ン を 呼ぶ 。 SUZUME KEIKO M. 1.15678 
TABAKO YOUKO к. 9g2SH1 159 
リス ト 4 デー タ 整 理 の た め の プ ログ ラム 
ABAYO NAOKO K. с-22 
АМЕ... RUMIKO K. SH96-1 
HATACHINI.NAREBA JUNKO S. 


42 on 


ARRAY TBLL10003J, BUFCB11; 


б:-бОВЕ5СВИҒ(022%1; 
1:20; 
REPERT 
С:-РЕЕКСӨФ12; 
TBLL49*TP+1]:=Cj 
1:=1+1 
UNTIL C=$8D; 
TP : =TP+1 
END; 
PROC GETL; 
BEGIN 
WRITE ("8"2; 
CRLLC$03) :=9, RDRESCBUF L8) ; 
WRITE (72; 
MOVE 


END; 
PROC PUTL (1); 

UAR C,J; 

BEGIN 
J:=40*1; 
REPEAT 

C:=TBL[JJ;PUT CCO;PUTWCC) jJ :=J+1 

UNTIL C-$0D; 


IMZ 1984.5. 


WHILE I«TP DO 
BEGIN 
PUTL (1);1:=1+1 
END 
END; 
PROC MAKTBL ; 
BEGIN 
GETL ; 
WHILE BUFE9]>$2329 DO 
GETL 
END; 


FUNC COMP (I,J); 
BEGIN 
IF TBLLI]>TBL[J] THEN СОМР:=1; 
IF TBL[IJ<TBL[JJ THEN СОПР:--1; 
IF TBL[IJ)=TBL[JJ 
THEN 
IF C(TBLCIJ-$20) OR (TBLLIJ-$00) 
THEN COMP :=9 
ELSE 
СОМР :=СОМР (I*1,J*12; 
ЕМО; 
PROC SWAP (I,J); 
ЧАВ S,K, IK, JK; 
BEGIN 
К:=0; 
WHILE K<49 DO 
BEGIN 
IK:zI*K ;JK:-J*K ; 


S:=TBL[JKJ;TBL[JKJ:=TBL[IKJ; 
TBLLIK) :=S jiK =K+1 
END 
END; 
PROC SORT; 
UAR I,J, IT, I2; 
BEGIN 


50-6468 
HITORIBOCCHIDE.ODORASETE NAOKO к. С-150 


КАПОМЕ. WA. КАМОМЕ NAOKO к. С-91 
KESYOU JUNKO S. SU-2925 
KONOSORA.0.TOBETARA TOKIKO к. DKQ-1928 
LA-LA-LA NAOKO K. c-? 
MADOGARASU NAOKO к. C-10@4 
MINIKUI.AHIRUNO.KO NAOKO K. С-119 
OIKAKETE. YOKOHAMA JUNKO S. SU-6363 
PIERROT JINPRCHI N. C-153 
NAOMI C. RK-51 


ROUGE 
SHIRMRSE . SHIBRI JUNKO S. 


SUzUIE KEIKO n. 
TABAKO YOUKO K. 
USOTSUKI.GA.SUKIYO MIMI H. 


FOR I:=(TP-3) DOWN 1 DO 
FOR J:=@ TO I DO 
BEGIN 
11:=40*J;12:=I1+40; 
IF COMP (11,12)›@ THEN 
SWAP (11,122 
END 
END; 
z MAIN PROGRAM x 
BEGIN 
INIT; 
MAKTBL ; 
SORT; 
OUTTBL 
END. 


サン プル プロ グラ ム 

PASCAL}, BASIC と 同じ (汎用 プロ 
グラ ミン グ 言 語ら 言え ます 。 そ と で , НИМ 
が サン プル で ある よう な プロ グラ ム は 考え 
にくい の で す が 、 СФ д БЫЗ” 
ー タ を 整理 する プロ グラ ム を 作っ て み ま し 
た 。 と いっ て も , ХЖЕДОСОЖ<, 

項目 名 一 データ 

の 形 で 打ち 込ま れる デー タ を 項目 名 で 辞書 
式 に 並べ 換え て プリ ンタ へ 出力 する も の で 
す 。 こ の プロ グラ ム を リス ト 4 に 示し ます 。 
MAKTBL が 実行 きれ る と , デー タ は 1 行 
(40 字 ) ずつ, 配列 TBL 内 に 読み 込ま れ て い 
きま す 。 こ の と き , 画面 の 左端 に は 

# 

の 記号 が 出 て , 入力 を 待ち ます 。 1 カラ ム 
目 に 空白 (以下 の ASCI エ ュー ド を 持つ 文字 ) 
が 打ち 込ま れる と , SORT に 実行 が 移り , 
並べ 換え が 終わ る と ,。 OUTTBL に よっ て 
TBL の 内 容 が 画面 と プリ ンタ へ 出力 され ま 
+, それ ぞ れ の 手続 き の ア ル ゴ リ ズム は 極 
め て 単純 で すか ら 説明 は いら な いで し ょ う 。 
な お , 画面 か ら の 1 行 入力 は モニ タ サ ブル 


の 略 で す 。 こ れ は , GAME の 製作 者 大 西 博 
氏 に よっ て 製作 きれ た だ Algol 系 の 小言 語 で , 
PASCAL と 似 た 文法 を 持っ て いま す 。 大 西 
氏 は , ASCII で の GAME の 連載 を 終え る に 
あたっ て , GAME は 時 代 遅 れ で , これ か ら は 
Algol 系 の 言語 の 時 代 で ある こと を 指摘 し て 
いま し た 。 それ に 対す る 自分 自身 の 答え と 
いう も の が , この TL/1 に は 表 わ れ て いる 
よう に 思わ れ ま す 。 すなわち , BASIC に は , 
局所 変数 が 使 を な い ,、 サブ ルー チン に 引数 
が 使 を ない, と いっ た 欠点 が あり ます 。 こ 
れ で は 中 規模 以上 の プロ グラ ム を 作る の は 
不便 で す 。 し か し , これ ら の 機能 を BASIC 
に 取り 付け る こと と 実行 速度 は トレ ー ド オ 
77%. 627, コン パイ ラ を 用 いる わけ 
に な る の で す が , それ で は 大 量 の メモ リ が 
必要 に な り ま す 。 こ れ で は 実際 の 役 に は 立 
ち ま せ ん 。 そこ で 大 西 氏 が 考え た の は 言語 
長 を 1 バイ ト に し て , ほとん ど を 1 バイト 
命令 で 処理 し よう と いう こと で す 。 思 えば, 
GAME, PALL, FORM, microPASCAL, 
どれ を 取っ て も 1 語 長 は 2 バイ ト で す 。 Z< 
の よう な 状況 に あっ て , ワー ド が 1 バイト 
長 の コン パイ ラ を 作っ て し まっ た 大 西 氏 の 


特集 クリ ー ン コン ピュ ー タ と 言語 


TL/1 が 初め て ASCII 誌 に 掲載 され た の 
は 80 年 の 6 月 号 に お いて で す が , それ か ら 
約 半年 た っ た , 81 年 の 3 月 号 で , MZ へ の 移 
植 版 が 発表 きれ まし た 。 鈴木 仁志 氏 の 手 に 
よる も の で す 。MZ-80K/C の モニ タ は SP- 
1002 で , その 機能 は か な り 貧 弱 で し た が , 
この TL/1・MZ に は それ を 補う た め の 強力 な 
モニ タ が 内 蔵 き まれ て いま す 。 こ の た だ ため , 2 
の TL/1 シ ステ ム は 一 種 の 0S (言い 過ぎ ? ) 
と も いえ る ほど , 使い 勝手 が 良く な っ て い 
ます 。 た が だ, 残念 な こと に 1Z-009A の モニ 
タ で は 直接 利用 する こと が で き な い こと で す 。 


エディ タ ・ シ ステ ムッ 開発 

TL/lU3sUT., атри, モニ タタ コマ 
ンド と エディ イタ コマ ンド に 分 か れ て いま す 
が , どの モー ド の と き が どの コマ ンド と い 
っ た 区 別 は され て いま せん 。 ど ちら の コマ 
ンド も 同じ コマ ンド レベ ル で 使用 する こと 
が で きま す 。 こ の 点 が . モニ タコ マン ド を 
使う に は モニ タ ^ へ 移る 必要 が ある , Hu-BA 
SIC な ど と は 違っ て いま す 。 表 5.1 に モニ タ 
コマ ンド と エディ タコ マン ド の 一 覧 表 を 示 
し ます 。 


ー チ ン ($0003) を 呼ぶ こと で 行なっ て い 実行 力 に は 感服 せ ず に は いら れ ま せん 。 まだ た メモリ マッ プ は 図 5.1 の よう に な っ て 
š+, ik, この プロ グラ ム の 実行 結果 も 表 5.1 TL/1 の モニ タコ マン ド と エディ タコ マン ド 
図 4.3 に 示し て お きま す 。 モニ タコ マン ド 
820% — | ж 味 ・ 機 能 
ちょ っ と ひと 言 Meinory Mn n 番 地 か ら 16 バ イト 分 の メモ リ の 内 容 を 表示 する 。 
: £ Ë Dump Mh, n 番 地 か ら 最 後 の 番 地 ま で の メモ リ の 内 容 を 表示 する 。 

PALL LA, 2 PuPASCALI L >, Мп,т n 番 地 か ら m 番 地 ま で の メモ リ の 内 容 を 表示 する 。 
PASCAL の 特色 を を なす, データ の 構造 化 と いずれ の 場合 も SPACE で 一 時 停止 , [SHIFT |+[ BREAK | で 中 断 す る 。 
いっ た 機能 を 持っ て いま せん 。 ま た , ポイ この コマ ンド に よる 出力 結果 は スク リー ン エ ディ ッ ト が で きる 。 
ンタ と いう デー タ 型 も あり ませ ん 。 し か し Memory correct | та bee n 番 地 か ら の メモ リ の 内 容 を a,b,… と する 。 
シャ ー プ が 大 々 的 に 売り 出し て いる (いた I 2 4 ーー 

leClmal п n を 1 = 示 - 
9 ` 9 1 = > 1) |р > 
i ET ZAZ ЖРАЗОДЫС b eddie. Hexa decimal Hn n を 16 進 数 に 変換 し て 表示 する 。 
機能 は 付い て な く , テー プ 版 で PASCAL を їп Es лал =ош ФӘ, 
作る こと の 上 難し き が 表 わ れ て いる よう に 思 Out On. m | n 午 の 出 カ ポー ト に m を 書き 込む 。 
われ ま ЕЛ それ な ら iz, と いう ご と で 機械 Transfer Тп, т, 4 n 番 地 か ら m 番 地 の 内 容 を & 番地 か ら に 移す 。 
語 機能 を 充実 きせ た , PASCAL は , マイ Write Wf, n, m n 番 地 か ら m 番 地 ま で を f と いう ファ イル ネー ム で テー プ に セー プ す る 。 
コン を 活用 する に は 良い 言語 だ と 言え る の а ERAT 
し ,n,m,£ 同じ で , 実行 = e 
で ゆな いで し ょ よう か 。 - =a 
エディ タコ マン ド 
< 参考 文献 > 命 令 – ж É 意 味 ・ 機 能 
o 丸山 定信 "micro PASCAL, ASCII, : : 
80 年 1 月 号 一 3 月 号 List 0 ソー ステ キス ト を すべ て 表示 する 。 
ы о 
š " ; / 行 番号 が n 番 か ら の ソー ステ キス ト を 表示 する 。 
o 辻 H г AL- " ч 
тете micro EASCALMZY АЗОП いずれ も , 一 時 停止 , 中 断 は M コ マン ド と 同じ 。 
< Delete n ソー ステ キス ト か ら 行 番号 が n の 行 を 削除 する 。 
Tnsert n 文 字 列 文字 列 に nm と いう 行 番 号 を 付け て , テキ スト に 入れ る 。 
Auto A 開始 行 番号 1000, 増分 10 で , プロ グラ ム を 打ち 込め る よう に する 。 
An 開始 行 番号 n 増分 10 で , プロ グラ ム を 打ち 込め る よう に する 。 
Ап,т 開始 行 番号 n, 増分 m で , プロ グラ ム を 打ち 込め る よう に する 。 
Renumber Rn, т 現在 の プロ グラ ム を 開始 行 番号 n, 増分 m で リナ ン パ する 。 
R, Rn の 形 も ある が , 省略 され て いる パラ メー タ は A コ マン ド と 同じ 。 
New New テキ スト を クリ ア す る 。 
要 Question Q テキ スト の 開始 番地 , 最終 番地 , RAMEND の 番地 を 表示 する 。 
概 Begin pointer B テキ スト の 最終 番地 を 正しく セッ ト す る 。 
TL/1 と は Tiny Language 1 (小言 語 No.1 ) Bn テキ スト の 開始 番地 を n と し て , テキ スト の 最終 番地 を 正しく セッ ト す る 。 


特集 MZ は コト バ の 天才 で ある 
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$5.1 (つづ き ) エディ タコ マン ド ( つ づき ) 


T 


命令 -RÉ ж 味 ・ 機 能 
Find F 文 字 列 テキ スト 中 に ある , 指定 する 文字 列 を 含む 行 を 表示 する 。 
一 時 停止 ・ 中 断 は M コ マン ド と 同じ 。 
Save Sf ソー ステ キス ト を f と いう ファ イル ネー ム で テー プ に セー プ ブ す る 。 
f は 省略 し て も よい 。 
Load Lf テー プ か ら f と いう ファ イル 名 を ロー ド し , 現在 の テキ スト に アベ ペン ド す る 。 
f を 省略 する と , 最初 に 見 つか っ た ファ イル ロー ド す る 。 
Compile с ソー ステ キス ト を コン パイ ル す る 。 
Execute X コン バ パイル され た オプ ジェ クト プロ グラ ム を 実行 する 。 
Write Wf コン バイ ル さ れ た オプ ジェ クト を f と いう ファ イル 名 で テー プ に セー プ す る 。 
f は 省略 で きる 。 


図 5.1 TL/1・MZ の メモ リマ ッ プ 
Ба ドス ター ト 
ホッ トス ター ト $1202 

$1200 


オプ ジェ クト ・ プ ログ ラム 
RAMEND 


Те 


エディ イタ は 。 行 番号 に よっ て ソー スプ ブロ 
グラ ム を 管理 する BASIC タ イプ の も の で す 


か ら , BASIC と 同じ 感覚 で プロ グラ ム を 打 


ち 込 むこ と が で きま す 。 £ R, スク リー ン 
エディ イッ ト を する こと も で きま す 。 

コマ ンド の - 覧 表 を 見 れ ば ,TL/I の モニ 
タ の 素晴らし きる が わか る の で は な いで し ょ 
2 が 


文 法 
ө プロ グラ ム の 構成 
TL/1 の プロ グラ ム は 図 5.2 の よう な 構成 
に な っ て いま す 。TL/1 は , 文法 自体 は PA 
SCAL に 似 て いま す が ,。 プ ログ ラム の 構成 


は PASCAL と 大 きく 異な っ て いま す 。 まず, 


プロ グラ ム の 先頭 で , 

PROC 手続 き 名 1,…., 手 続き 名 n 
に よっ て , プロ グラ ム 中 に 表 わ れ る すべ て 
の 手続 き 名 を 宣言 し て お きま す 。 同様 に , 
次 は , 

FUNC 関数 名 1.…, 関数 名 m 
に よっ て , すべ て の 関数 名 を 宣言 し て お き 
ます 。 もちろん, 手続 き や 関数 が 存在 し な 
いと き は 省略 し ます 。 

PASCAL で は , ある 手続 き や 関数 が ユン 
パイ ル さ る され て いる と き , その 中 に 表 わ れ る 
手続 き 名 や 関数 名 は すでに 定義 きれ て いな 
けれ ば な ら な いと いう 鉄則 が あり ます 。 し 
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5.2 TL/1 の プロ グラ ム 構 成 


手続 き 宣 言 
TUE d 


か し, TL/1 で は , PROC ° FUNC с 2 
行なう ため に , 手続 き や 関 数 の 定義 は 、 А 
イン プロ グラ ム の あと な ら , どう いう 順序 
で 書い て も いい こと に な っ て いま す 。 

次 に くる の が , 大 域 変数 宣言 と 配列 官 言 
CT, 宣言 の 仕方 は , VAR と ARRAY を 使 
v, PALL や microPASCAL と まっ た く 同 
じ で す が , 宣言 の 順 座 が 逆 で すか ら 注 意 し 
€ CI SU 

そし て , その 次 に くる の が メイ ンプ ブロ グ 
ラム の 本 体 で す 。 PASCAL な ど で は , メイ 
ンプ ログ ラム は , 手続 き や 関 数 の あと に き 
ます が , TL/1 で は 最初 に きま す 。 プロ グラ 
ム を 読む と き は , 普通 .、 メ イン プロ グラ ム 
か ら 読 ん で いき ます か ら , TL/1 の ほう が 自 
然 な 形 を し て いる と も いえ ます 。 メ イン プ ' 
ログ ラム は BEGIN& と END に よっ て 囲ま れ 
た 文 の 集まり で す が , END の 後に . は 付い 
Togt As 


最後 に くる の が 手続 き や 関数 の 宜 言 で す 。 


手続 き の 宣 言 は 次 の よう な 形 を と り ま す 。 
名 前 (引数 1, …, 引数 n) 
VAR 局所 変数 1, …, 局所 変数 m 
ARRAY 局所 配列 1[ サ イズ 1],…., 

局所 配列 1 〔 サ イズ 1〕 
BEGIN 
X1:X2;^ 

END 

この と き , 名 前 と は 手続 き 名 か 関数 名 の こ 


ЕС, も は や , PROC や FUNC を 付け る 必 
要 は あり ませ ん 。 引 数 が な い 場 合 , (引数 1, 
…) の 部 分 は 省略 し て 名 前 だ け を 書き ます 。 

局所 変数 の 宣言 や 局所 配列 も , それ ら が 
不要 な 場合 は 省略 で びき ます 。 と ころ で , B 
所 配列 が 宣言 で きる と いう の も TL/1 の 大 き 
な 特徴 で す 。 こ の 定 言 は PALL や microPA 
SCAL に は あり ませ ん 。 

関数 か ら 値 を 返す た め に は , RETURN 文 
ds 

RETURN X 

と いう 文 を 実行 きせ ます 。 こ れ は PALL の 
場合 と 同じ で す 。 関数 内 で は , RETURN 文 
を 少な く と も ひと つ 書 か ね ば な り ま せん 。 
e 定数 ・ 変 数 

定数 は 1 バイ ト の 定数 で す 。 し た が っ て 
10 進 数 な ら 0 一 255( 待 号 付 き と み れ ば ー128 
—127), 16 進 数 な ら , $00— ЕЕ, 文字 定 
数 な ら "1 文字 "で 表わす こと が で きる は よ 
うに な っ て いま す 。 論理 定数 は , 真 が $F 
F, 偽 が $00 で す 。 
ө 演算 子 

TL/1 の 演算 子 は 以下 の よう な も の が あり 
ます 。 英字 の 演算 子 に つい て は , 両側 の . 
を 省略 し て も 構い ませ ん 。 


° 算術 演算 子 
+ (ALS) 
ー (ひき 算 ) 


ж (かけ算 , 結果 の 上 位 バ イト は 
MHIGH と いう シス テム 固有 の 変 
数 に 入る ) 

И (わり算 , 余り は MOD と いう 
シス テム 固有 の 変数 に 入る ) 

„АОС. (キャ リー 付き の た し 算 ) 

.SBC. (ボロ ー 付 き の ひ き 算 ) 

s 比較 演算 子 

> (Жам) 

GT. (大 きい , 数 を 符号 付き と みる と き ) 

< (лас) 

LT. (小さ い , 数 を 符号 付き と みる と き ) 

= (等しい) 

% (等 し く な い ) 

° 論理 演算 子 

АМО. (論理 積 ) 

OR. (論理 和 ) 

.EOR. (排他 的 論理 和 ) 

e x 

TL/1 で 使用 する (実行 ) 文 を 表 5.2 に ま 
を ゆま し だ 。 

その 他 に 注目 すべ きこ と は , 複 号 文 を 表 
わす と き は , BEGIN END の 組み だ kk 
E ]。( J ой g z РТТ, š 
れ ら を 適当 に 使い 分 けれ ば , か な り 見 や す 
グセ ログ ラム を 書く こと が で きる で し ょ う 。 


表 5.2 TL/I-MZOX 


特集 クリ ルーン コンピュー と 言語 


IF 条件 THEN 文 1 ELSE 文 2 


文 の 種類 — A ғ Ж 23 
代入 文 変数 := 式 式 の 値 を 変数 に 代入 する 。 
複合 文 BEGIN X1 文 2 …END 複数 の 文 を ひと つの 文 と みな す 。 
IFX IF 条件 THEN X 条件 が 真 な ら 文 を 実行 する 。 


条件 が 真 な ら 文 1. そ う で な けれ ば 文 2 を 実行 する 。 


FOR 変数 : —5t1 DOWN 式 2 DO X 


CASE 文 CASE 式 0 ОҒ 式 0 の 値 が 式 i(1 ミ i ミ nー1) の 値 と 等 し けれ ば 文 : を 実行 する 。 そ う で な けれ ば 文 n を 実行 する 。 
式 1 文 1 
式 』- ュ Жо-1 
ELSE Xn 
FORX FOR 変数 := 式 1 TO 式 2 DO X 変数 の 値 を 式 1 の 値 か ら 1 ず つ 増 や し , 式 2 の 値 を 越え る まで て 文 を 繰り 返す 。 


上 の FOR 文 で 増分 が 1 の も の 。 


REPEAT 文 


REPEAT X1 文 2 …UNTIL 条 件 


WHILE 条件 DO 文 
MEM( 式 1, 式 2) : = 式 


WHILE 文 


条件 が 真 に な る まで REPEAT と UNTIL の 間 を 繰り 返す 。 
条件 が 真 の 間 , 文 を 繰り 返す 。 


式 1, 式 2 の 値 を それ ぞ れ 上 位 , 下位 アド レス と する メモ リ 領 域 に 式 の 値 を 書き 込む 。 


0UT 文 PORT ( 式 1) : = 式 2 式 1 で 示さ れる 出力 ポー ト へ 式 2 の 値 を 出力 する 。 
CALL 文 CALL( 数 1, 数 2) 数 1, 数 2 を 上 位 , 下位 バイ ト と する 番地 の 機械 語 サ ブ プルー チン を 呼ぶ 。 
CALL (Gi, #2, 51) 式 1 の 値 を A レ ジス タ に 入れ て 機械 語 サ ブル ー チ ン を 呼ぶ 。 
CALL( 数 1, 数 2, 式 1, 式 2) 式 1 の 値 を A 人 レジ スタ , 式 2 の 値 を H レ ジス タ に 入れ て サブ ルー チン を 呼ぶ 。 
CALL( 数 1, 数 2, 式 1, 式 2, 5X3) Жі, R2, 式 3 の 値 を A,H,L レ ジス タ に 入れ て サブ ルー チン を 呼ぶ 。 
SET 文 SET ( 式 1. 式 2) 式 1, 式 2 の 値 を x, y 座 標 と する 点 の セッ ト 。 
RESET 文 RESET( 式 1, 式 2) 式 1, 式 2 の 値 を x, y 座 標 と する 点 の リセ ッ ト 。 
INVERSE 文 INVERSE ( 式 1, 式 2) 式 1. 式 2 の 値 を xy 座標 と する 点 の 状態 を 反転 する 。 
SENSE 文 SENSE | SHIFT |+[ BREAK | が 押さ れ て いれ ば 実行 を や め る 。 ] 
CURSOR 文 CURSOR( 式 1, 式 2) | жа, 式 2 で 示さ れる 位置 に カー ソル を 移動 する 。 
STOP 文 STOP プロ グラ ム の 実行 を や め る 。 
ニー) 
RETURN 文 RETURN 手続 きか ら 強制 的 に 戻る 。 
RETURN 式 式 の 値 を 関数 の 値 と し て , 関数 か ら 戻 る 。 
WRITE 文 WRITE( 式 : 要 素 1、…, 要素 n) 要素 を 式 で 表わさ れる 出力 装置 (0 つ CRT, 1 っ プリ ンタ ) へ 出力 する 。 
< 要素 の 種類 > 
式 式 の 値 を 10 進 左 詰め 出力 。 SPACE( 式 ) 式 の 値 の 数 だ け 空 白 を 出力 。 
# (81,82) 式 2 の 値 を 式 1 の 桁 数 で 右 詰め 出力 。 CRLF 改行 する 。 
“文字 列 " 文字 列 の 出力 。 CRLF( 式 ) 、 式 の 値 の 回 数 だ け 改行 する 。 
ASCII( 式 ) 、 式 の 値 を ASCII コ ー ド て 出力 。 


| 


また , PASCAL な ど で は 文 の 区 切り を : 
で 示し て いま し た が , TL/1 で は 空白 を 使っ 
て も よい さと た な っ る て ひま すず す 。 も た な が っ で 
構文 解析 に お いて , TL/1 は PASCAL に 勝 
っ つて いる と いえ ます 。 
Ф 組み 込み 関数 

表 5.3 に TL/1 で 使え る 組み 込み 関数 を 示 
し ます 。 こ の うち , 特徴 的 な の は USR 関 数 
で し ょ う 。 機械 語 サ プル ー チ ン を 実行 し た 
と き の 結 果 (A レジ スタ の 値 ) を 変数 に 代 
入 で きる の で すか ら , 機械 語 と の リン ク が 
非常 に や りや すく な っ て いま す 。 


サン プル プロ グラ ム 
TL/1 の モニ タ は , いろ ん な 機能 を も っ て 
CTH, ソー スプログ ラム の リス ト を プ 
リン タ へ 出力 する こと は で きま せん 。 そ を そこ 
で 。 ソ ー ス リス ト を プリ ンタ へ 出力 する た 
め の プ ログ ラム を 作り まし た 。 これ は , あ 
ら か じ め カ セッ ト テ ー プ に セー ブ き され て い 
る ソー スプ ログ ラム を 読み 込ん で プリ ンタ 
へ 出力 する も の で す 。 そ の リス ト は リス ト 
5 の よう に な っ て いま す 。 こ の 中 で 機械 語 


س س 


表 5.3 TL/1・MZ の 組み 込み 関数 


USR( 数 1, 数 2, 式 1) 
USR (#1, 数 2, 5X1, 式 2) 
USR (3t, 数 2, 式 1, 5X2, 式 3) 


名 前 引 数 ・ 値 
RND( 式 ) 1 一 式 の 値 の 乱数 を 値 と する 。 
NOT( 式 ) 式 の 値 の 1 の 補 数 を 値 と する 。 

| NEG) 式 の 値 の 2 の 補 数 を 値 と する 。 

| сом(ж) 式 の 値 の 1 の 補 数 を 値 と する 。 
ROR( 式 ) キャ リー 一 式 の 最上 位 ビ ピッ ト , 式 の 最 下位 ビッ トー キャ リー と な る 右 ロ ー テ ー ト 。 
LSR( 式 ) 0 一式 の 最上 位 ビ ピッ ト , 式 の 最 下位 ビッ トー キャ リー と な る 右 シ フト 。 
ASR( 式 ) 式 の 最上 位 ビ ピッ ト は 変化 し な い , 式 の 最 下位 ビッ トー キャ リー と な る 右 シ フト 。 
ASL( 式 ) 式 の 最 下 位 ビ ピット 一 0, キ ャ リー 一 最上 位 ビ ピッ ト と な る 左 シ フト 。 
ROL( 式 ) 式 の 最 下位 ビッ トー キャ リー, キャ リー 一 最上 位 ビ ピッ ト と な る 左 ロ ー テ ー ト 。 
RRC( 式 ) 式 の 右 ロ ー テ ー ト 。 最 下位 ビ ピット 最上 位 ビ ピット 。 
RLC( 式 ) Û の を ロー テー ト 。 最 下位 ピッ トー 最上 位 ビ ッ ト 。 

USR (3 1, 数 2) 


それ ぞ れ CALL と 同じ 機能 を 持つ が , リ ター ン 時 の A レ ジス タ の 内 容 が 関数 の 値 と な 
る 。 


POINT (z1, 式 2) 


式 1. 式 2 の 値 を xy 座標 と する 点 が セッ ト さ れ て いる と 真 ($FF) そう で な けれ ば 偽 
($00) を 返す 。 


GET( 0 ) キー ボー ド か ら 1 文 字 入力 し て , その キー の ASCII コ ー ド を 値 と する 。 
READ (0) キー ボー ド か ら 10 進 数 を 入力 し て , それ を 値 と する 。 
RDHEX( 0 ) キー ボー ド か ら 2 桁 の 16 進 数 を 入力 し て , それ を 値 と する 。 
PORT (3È) | 式 で 示さ れる 入力 ポー ト の 値 を 返す 。 


MEM( 式 1, 式 2) 


式 1, 式 2 の 値 を 上 位 , 下位 アド レス と する メモ リ の 内 容 を 値 と する 。 
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リス ト 5 ソー スプ ログ ラム を プリ ンタ へ 
出力 する プロ グラ ム 
1800 PROC RDINF,RDDAT;,PUTN,PUTL x 
1018 FUNC GETCH 


1820 UAR EOL,EOF, TXTRH, TXTRL, C 
1830 BEGIN 

1040 — TXTRH:-$580 TXTRL :=$99 
1854 MRITE(9:"EOL CODE?") 
1968 EOL :=RDHEX(@) 


1110 WHILE C # EOF DO 
1128 С PUTN PUTL 

1138 C:=GETCH 1 
1148 MRITE(9:CRLF(2)) 
1158 — HRITECI:CRLFC2)) 


1220 MRITE(9 :CRLF。 "LOADING ") 
1238 MRITECI:"LISTING ОҒ "2 
1240 Із=%Ғ1 С:=МЕМСФ18, 1) 
1258 HHILE C # $8D DO 

1260 L MRITE(9:RSCII(C)) 


1278 WRITECI :Я5С11СС22 

1288 I:5]*1 С:=МЕМСФ18,1) 2 
1298 MRITE(@:CRLF ) WRITECI :CRLFC2)) 
1300 END 

1310 z 

1328 RDDAT 

1330 BEGIN 


1348 NENC$11, $84) :=$800 
1358 NENC$11, $05) :=$59 
1369 CRLL(*$94 , $F8) 

END 


1418 BEGIN 
1420 С:=пєгї TXTRH, TXTRL) 
1439 TXTRL:-TXTRL«1 
1448  TXTAH:=TXTAH. ADC. 8 
1458 RETURN C 

END 


1428 : 

1488 РИТМ 

1499 UAR 1,0 

1508 BEGIN 

1518 D:=GETCH 

1528 CALLC$48,8,8,C,D) 
1538 FOR 1:=@ TO 3 00 
1548 С D:=MEN( $48, #48+1) 
1558 WRITECO :ASCIICD)) 
1568 WRITECI :ASCIICDO) J 
1528 MRITEC8:SPACECI)) 
1588 WRITECI :5РАСЕ(122 
1590 ЕМО 

1600 z 

1618 PUTL 

1620 BEGIN 

1638 С:-бЕТСН 


1648 WHILE C # EOL DO 
1658 С ШЕІТЕСӘ:А5С11(С22 
1668 WRITECI :ASCIICCOO 


2 
8 
T 
g 


1699 MRITECI :CRLF) 


1288 SENSE 

1710 END 

$4008 F5 CS DS 44 ве 4D 88 Е5:...0.М.. 
$4008 CD 20 48 11 99 80 CD 4C:.-@B...L 
$4018 40 CB 78 20 ӨЗ 13 18 F6:9. 5 .B.. 
$4018 CD 45 40 23 F6 38 77 28:.EQR.04+ 
$4020 7A ВЗ 28 04 42 4B 18 ЕЗ:Я7+С.ВК.. 
$4028 E! 01 СІ F1 C9 21 ЗЕ 40:..... 5e 
$4038 ЗЕ 20 1Е 06 フフ 23 1D 20:5 ..#8. 
$4038 FB ЗЕ Өр フフ 2B C9 99 88:.5.&*... 
$4040 00 BA өе BA ƏD ЗЕ OA 03:..... as 
$4048 30 20 FC СЭ ЗЕ BA ев 30:- ..»..- 
$4050 20 FC C9 ге ге ге ве ве: ....... 


の 部 分 は , 2 バイ ト の 数 値 で 表わさ る れ て い 
る 行 番号 を ASCII コ ユー ド の 列 に 直す も の で 
す 。 こ の 機械 語 ゲ ログ ラム は , TL/1 の モニ 
タ を 使え ば 簡単 に 打ち 込む こと が で きま す 。 
L, ЕСІ. (End Of Line) L EOF (End Of 
File) oO2—F*ahcs£Ed»o,v— 
スプ ログ ラム が TL/1 の と き は 00 と FF を 順 
EAT GTRS FE алыша 
ー ド で , GAME-MZ の ソー スプ ログ ラム を 
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プリ ンタ へ 出力 する こと も 可能 で す 。PALL 
や FORM の ソー スリ スト を 出力 する と き は , 
EOL と EEOF を 0D と 00 に すれ ば よい で し ょ う 。 

Жы, この プロ グラ ム 中 で 呼ん で いる 機 
語 サ ブルー チ ン の うち , $04D8 は カセ ッ 
ト テ ー プ か ら イ ン フ ォ メ ーション ブロッ ク 
を 読み 取る ルー チン , $04F8 は デー タブ ロ 
ッ ク を , 10F1 番 地 か ら 始 まる テー ブル に 
従っ て ロー ド す る ルー チン で す 。 


ちょ っ と ひと 言 

TL/1 は , それ 以前 の PALL や micro PA 
SCAL な どの 小言 語 を 集大成 し た よう な 言 
語 で ある と 言え ます 。 も ちろ ん , BEOXA 
し いま で に 豊富 な 機能 を も っ た BASIC に は 
か な わな い 部 分 も ある か も し れ ま せん が , 
当時 とし て は , 整数 型 小 言語 の 行き 着く 先 
が この TL/1 だ っ た の で は な いで し ょ うか 。 
その 証拠 に , TL/1 以 来 . それと 同系 統 の 言 
語 で これ と いっ だ も の は 発表 きれ て は いま 
せん 。 СЫ, この TL/1 を ,。 モ ニタ 変換 す 
る こと な くく モニ タ 1Z-009A の 上 で 動く よう 
に 移植 する こと が で きれ ば 相当 な 価値 が あ 
る と 思う の で す が 。MZ 誌 上 で それ を 行 な 
う の は 版権 の 問題 か ら み て も 不可 能 の よう 
CAR Id. 


< 参考 文献 > 
° 大 西 博 他 ТТІ,/1) ASCII, 
80 年 6 H7 —11H tro 
° 鈴木 仁志 他  "TL/I-MZ&TL/I-CBM; 


ASCII, 81 年 3 Н>, 
ecTL/1 リ ジア ビン スズ ス ・ マ ニテ アル 
ASCII, 821107 57, 


s Ж 

Бол, 人 工 知能 の 研究 が 盛ん に な っ て き 
て いま す が ,。 それ に 伴っ て , それ を 助け る 
言語 と し て LISP や PROLOG が 注目 を 浴び 
て いま す 。 LISP は FORTRAN に 続い て 古 
い 言 語 で す が 。 や っ と その 価値 が 一 般 に 認 
め ら れ て きだ た と いえ ます 。 

LISP の 大 き な 特 徴 は 代入 文 が な いと い 
うこ と で す 。 こ れ は BASIC な どの 言語 に 慣 
れ て し まっ て いる 人 々 に と っ て は 戸惑い の 
原因 に な り ま す 。 こ の ため , LISP は , 2 
ぶ の が 簡単 で ある に も か か わら ず , 敬遠 き 
れれ が ちな の で し ょ う 。 まだ,。 LISPE BN 
数 どけ し か 存在 し ませ ん 。 LISP に お いて , 
プロ グラ ム を 作る こと は , すでに ある 関数 


を 寄せ 集め て 新しい 関数 を 定義 する こと に 
ほか な ら な い の で す 。 したがって, BASIC を 
よく 知っ て いる 人 で , 新た に LISP を 学 ぼ 
うと し て いる 人 は , これ か ら PASCAL を 学 
ぼう と し て いる 人 より も 大 幅 な 意識 の 改革 
が 必要 に な り ま す 。 しかし, LISP は 記号 
処理 言語 の 中 で は も っ と も 有名 な も の で す 
L, そこ に 流れ て いる 思想 は 他 の 記号 処理 
言語 に も 相 通 じ る も の が あり ます か ら , Ж 
っ て いて も 損 を し な い 言 語 で す 。 そ うす る 
うち に , LISP の 構造 の 数 学 的 美しき (N. 
HS) が 理解 で きる よう に な る で し ょ う 。 

ST, MZ で 使え る LISP と し て は , 80% 
12 月 号 の I /Os& EC, 浅見 俊幸 氏 ら に よっ 
て 発表 きれ た も の が 有名 で す 。 それは 基本 
5 関数 だ け か ら な る 純 LISP に 数 値 計算 と 
プリ ンタ 機能 を 付け 加え た 簡単 な も の で し 
к», かなり 複雑 な こと を や ら せ る こと が 
で き , LISP の 面目 を 保っ て いま し た だ た 。 し 
か し , この LISP は 使い 勝手 の 点 か ら み る 
t, あま り よ いも の と は 言え ませ ぜん 。 ジ ブロ 
グラ ム を 入力 する と き が , 大 変 面倒 で す 
(修正 が や り に くい /)。 LISP を MZ で 使い 
た いと 考え て いた 人 々 は , も っ と 使い や す 
い LISP の 出現 を 待ち 望ん で いた に 違い あ 
り ま せん 。 そ ん な し とき, Оһ/ PC83 年 4 月 
号 に お いて , 小倉 拍 氏 に よっ て PC88 版 の L 
ISP が 発表 きれ まし た 。 そ の LISP は I/0 の 
も の と 比べ る と 格段 の 機能 を も っ て いま し 
た 。 それ を 見 た 岡本 明弘 氏 が , 88 版 LISP 
を MZ 用 に 移植 し まし た 。 これ は , MZ-700 
の 単行 本 で 発表 きれ る 予定 に な っ て いま す 。 
以下 の 節 か ら は , これ ら ふ た つの LISP に 
つい て 紹介 し た いと 思い ます 。 


LISP の 扱う デー タダ 

LISP と は LISt Processor( リ スト 処理 
言語 ) の 省略 形 で す 。 そして, その 名 前 の 
と お り 。 LISP が 処理 する デー タ は リス 
ト し か あり ませ ん 。 しかも, それ は リス ト 
の 中 で も も っ と も 単純 な 構造 を も つ 二 進 木 
リス ト と 呼ば れる も の で す 。 これ は , 116.1 
の よう に , ひと つの 節点 か ら ふ た つの 枝 が 
出 て いる よう な 構造 を し て いま す 。 ELT, 
LISP は この 一 進 木 リス ト を 表現 する の に 
S 式 (S expression) と いう も の を 使用 し ま 
+, これ が , LISP に お いて よく 見 か ける カ 
ッ コ の 集まり な の で す 。 図 6.1 の 二 進 木 リス 
ト を S 式 で 表現 する と 

(((A—(B—C))—D) ((E. -Е). 6)) 
と な り ま す 。 こ れ は , 一 見 複雑 に 見 を ます 
が 次 の よう に 考え る と 簡単 で す 。 
@ Á は , (XY) 上 表わす 。 
© X ま た は Y が さら に A と いう 形 を 


図 6.1 二 進 木 リス ト 


し て いた ら , それ を (U_.V) で 置き 換え る 。 
この よう に , 二 進 本 リス ト は 再帰 的 に S 式 
へ 書き 直す こと が で きま す 。 逆 の こと も 同 
様 に どき ます が 。 同じ S 式 を も つと いっ て 
b, それ ら が 同じ 二 進 木 リス ト だ と は 限り 
ませ ん 。S 式 か ら 二 進 木 リス ト の 形 は 一 意 
まっ た く 同 じ 形 を も っ た 
二 進 木 リ スト が メモ リ の ふた つ 以 上 の 場所 
で 同時 に 存在 し て いる 可能 性 が ある か ら で す 。 

リス ト の 未 端 に ある 単語 は , アト ム と 呼 
ば れる S 式 で す 。 ア トム も 厳密 に は リス ト 
の 形 を し て いる の で す が , 
リス ト の 要素 の うち で , それ 以上 分 解 で き 
な いも の と 思っ て いれ ば いい で し ょ う 。 


に 決ま り ま すか が , 


特集 クリ ー ン コン ビュー タ と 言語 


表 6.1 LISP の 組み 込み 関数 ( 注 )x。y.x,.…xn は 二 進 木 リ メト . ま た は その 式 の S 式 。n, M, n, …,nm は 数 値 アト ム 。 


る し あたっ て は 。 


LISP の 組み 込み 関数 
LISP に は S 式 し か あり ませ ん 。 関 数 が 扱 
う デ ー タ も 関数 自身 も S 式 な の で す 。 し た 
が っ て , デー タ も 関数 も 区 別 が あり ませ ん 。 
LISP は 入力 る され た デー タ を すべ て 関数 と 
みな し て , その 値 (これ も S 式 ) を 求め よ 
うと し ます 。 こ の た め , S 式 を 関数 の 引数 
と し て 与え る と き は 。, 
ら 値 を 求め よう と し て は いけ な い , ある い 
lk, この S 式 の 値 は S 式 自身 だ , 
と を 教え て や る 必要 が あり ます 。 こ の た め 
の 関数 が 。 QUOTE な の で す 。 
LISP の 関数 は , 組み 込み 関数 で あろ うぅ 
と あと か ら 定 義 し た も の で あろ うと , 
(Bj. SI. S2 s) 
と いう 形 で 表わし ます 。S1, S2, … は 引数 
と し て 与え る S 式 で す 。 
る て , QUOTE に 話 を 戻し ます 。 いま, 
(PLUS. 1-23) 
と いう S 式 が ある と し ます 。PLUS と は 引 
数 の 総和 を 値 と する 関数 で すか ら , EDS 
式 の 値 は 6 (数 も それ 自身 を 値 と する S 式 
7) ERIE CPEs 
(QUOTE(PLUS. 4. 2. 3)) 


の 値 は , 


(PLUS. 1.2. 3) 

と いう 8 式 に な り ま す 。 
QUOTE の 逆 の 働き を する 関数 が EVAL 
で す 。EVAL は 引数 ほし て 与え られ た S 式 


<I/O 版 と 新版 で 名 前 が 同じ も の > 
名 前 引 数 値 ・ 機 能 
CAR х x の 第 1 要素 。 
CDR x x か ら 第 1 要素 を 取り 除い た も の 。 
NULL х x が NIL な ら T, そう で な けれ ば NIL。 
EQ х,у x と y が 同じ 二 進 木 リ スト な ら T, そう で な けれ ば NIL。 
EQUAL х,у x と y が 同じ S 式 な ら T, そう で な けれ ば NIL。 
ATOM х x が アト ム な ら T, そう で な けれ ば NIL。 
CONS ху x を 左 ,y を 右 の 枝 と する よう な 新しい 二 進 木 リス ト を 作り 値 と する 。 
QUOTE х x そ の も の 。 
EVAL х x に 対応 する S 式 の 値 を 求め る 。 
PRINT х x を S 式 に な お し て 出力 する 。 ま た , それ を 値 と する 。 
GET х,у x の 中 に y を さがし , あれ ば その 次 の 要素 を 値 と する 。 な けれ ば NIL。 
COND GG, y (ха, yo). | x。 が NIL で な けれ ば y,」, x。 が NIL で な けれ ば y。, … を 実行 する 。 
PLUS Ny, Na, ***, Пт n, +п nm (| 
DIFFERENCE n,m nーm 
ADD1 3r m m+1 
SUB1 m | mー1 
LIST Xi, Xo, Xn (Xis Xa, 777, Хп) 
MINUS -т 
MINUSP m く 0 な ら T, そ う で な けれ ば NIL。 
ZEROP m-0/; 5T, そう で な けれ ば NIL。 
GREATERP ‚п т>п 5T, そう で な けれ ば NIL。 
LESSP ‚п m ぐ n な ら T, そう で な けれ ば NIL。 
TIMES Ny, Nag 7*5, Xm n, Xn, X --- X nm. 
APPEND х,у x と y を くっ つけ る 。 
MEMBER ху y の 中 に x と いう 要素 が あれ ば T, そう で な けれ ば NIL。 
ORDA) 
ж 前 引 数 値 ・ 機 能 
ASSOC х,у 対 リ スト y の 中 で x の 対 を みつ け て 値 と する 。 な けれ ば NIL。 
PAIRLIS d X, y,a x,y か ら で き る 対 リ スト と , 対 リス ト a を APPEND す る 。 
SUBLIS а,х x の 中 の アト ム を 対 リ スト a の 中 の 対応 する も の に 置き 換え る 。 
NUMBER | х | が 数 値 ア トム な ら T, そ 3 で な けれ ば NIL。 RS | 
QUOTIENT E n, n を m で 割っ た 商 を 値 と する 。 J 
REMAINDER n, n を m で 割っ た 余り 。 
EON n,m nm な ら T, そう で な けれ ば NIL。 
< 新版 の み > 
名 前 引 数 値 ・ 機 能 31 
CAAR x (CAR(CAR x )) | 
CADR x (CAR(CDR x )) 
CDAR x (CDR(CAR x )) _| 
CDDR x (CDR(CDR x )) 
READ TU S 式 を 読み 込ん で , 二 進 木 リ スト に 変換 し て 値 と する 。 Ж 
ERROR ナシ この 関数 が 呼ば れ た 場所 (番地 ) を 出力 し て トッ プレ ベル へ も どす 。 
PAIR х,у x と y か ら 対 リス ト を 作る 。 
RPLACA х,у x の 左 の 枝 を y で 置き 換え る 。 
RPLACD х,у ЇЙ x の 右 の 枝 を y て 置き 換え る 。 
5А550С х,у 1/0O 版 の ASSOC と 同じ 。 
PAIRASS x,y,a I/ON&OPAIRLIS £ [S Ue 
ONEP n n=1# 5T, そう で な けれ ば NIL。 
TERPRI ナシ 
PUT х,у,2 x の 中 に y を 探し , その 次 の 要素 を z と する 。 
PHEX n n を 16 進 数 で 出力 する 。 
ADR х アト ム x の 番地 を 値 と する 。 
ASC n n と いう ASCII コ ー ド を も つ 文 字 を 値 と する 。 
PRIN1 х アト ム x を 出力 する が , 改行 し な い 。 
LENGTH х リス ト x の 要素 の 個数 を 値 と する 。 
AND Xis Xo, 777, Xn n=0 な ら NIL。xi(i=1ーn) の うち NIL が あれ ば NIL。 そ う で な けれ ば T。 
OR Xis Xas 77, Xn n=0# 5NIL,xi(i21—n) 2 Э &T^ b h£T, # э で な けれ ば NIL。 


特集 MZ は コト バ の 天才 で ある 47 


表 6.2 シス テム コン トロ ー ル 用 の 関数 の 使い 方 


/O 版 я м ж 23 
(OBLIST) OBLIST *) 現在 まで に 入力 され て いる すべ て の アト ム の リス ト 。 
(TRACE) (TRACE T) 以後, 関数 が 実行 され る 毎 に トレ ー ス する 。 
(CLEART) (TRACE NIL) 関数 の トレ ー ス を や め る 。 

(PRINTER) | (LP T) 出力 を プリ ンタ へ 出す **) i 
| (CLEARP) (LP NIL) プリ ンタ へ の 出力 を や め る 。 
(CLEARC) ーー 今 ま で 定義 し た 関数 を 抹消 する 。 

— (RECLAIM) 無理 や ちり, ガー ベジ コレ クシ ョ ン を 行わ せる 。 

ーー (GCP T) ガー ベジ コレ クシ ョ ン 時 の メッ セー ジ を 出力 する 。 

= (GCP NIL) ガー ベジ コレ クシ ョ ン 時 の メッ セー ジ を や め る 。 

um (END) モニ タ へ 制御 を 移す 。 


GE) ж) 新版 LISP で は 0BLIST は 関数 で は な 〈 定 数 。 こ の た め ( ) は 付け な い 。 
жж) 1/O 版 が 画面 全て を 出す の に 対し , 新 版 は 出力 結果 の み 。 


関数 の 定義 は 『 関 数 の 定義 。 の 節 へ ゆず る 。 


の 値 を 強引 に 求め よう と し ます 。 し た が っ て 
(EVAL. (QUOTE. (PLUS. 1. 2 
ー 3) ) ) 

の 値 は 6 と な り ま す 。 

表 6.1 に LISP の 組み 込み 関数 を 示し て お 
きま す 。 な お , I/O 版 LISP は 関数 で な い S 
式 を 引数 と し て 与 を る と き は , 自動 的 に Q 
UOTE が 付い て いる と みな す の で , QUOTE 
は 必要 あり ませ ん が , 統一 性 を 欠い て いる 
よう に 思わ れ ま す 。 

( 例 ) 


(CAR. (А. B. .C)) (1/ Оһ) 
(CAR. (QUOTE. (А.В. С))) 
(新版 ) 


表 6.1 に 載せ た も の は , 関数 を 定義 する と 
き に も 使え る 関数 で し た が , LISP に は シ 
ステ ム を コン トロ ー ル する だ め だ け に 使わ 
れる 関数 が あり ます 。1/O 版 と 新版 で は 少 
々 使い 方 が 異な り ま すか ら , これ を 表 6.2 に 示 
239589. 


関数 の 定義 
先 に も 述べ まし だ た よう に LISP に は 関数 
し か あり ませ ん 。 し た が っ て , LISP で する 
こと と いっ た ら 新 た な 関数 を 定義 する か , 
関数 の 値 を 求め ' あ こと し か あり ませ ん 。 関 
数 が 自由 に 定義 で どき る よう に な れ ば , 55 
LISP は わか っ だ た と いっ て も いい で し ょ う 。 
以下 に , 関数 の 定義 の 仕方 を 説明 し ます 。 
ө |/C 版 の 場合 
DEFINE と いう 関数 を 使い ます 。 そ の 形 
351%, 
(DEFINE. 関数 名  (LAMBDA. 5| 
Ж) Z F. 関数 の 本 体 ) ) 
この うち , 関数 の 本 体 は , 引数 リス ト の 中 
の 引数 や , 表 6.1 の 関数 を 使っ て 書か れ た S 
式 ( リ スト ) で す 。 だ と えば , 引 数 と し て 与え 
られ る リス ト の 最後 の 要素 を 値 と する よう 
な 関数 LAST は 以下 の よう に 定義 で どき ます 。 
(DEFINE. .LAST. (LAMBDA_ 


48 отм 1984.5. 


(L). (COND. (( NULL. (СОЮ. 

)) (CAR. .L)) 

(Т. -(І,А5Т. (СОЮ. 1))))) 

1#, VOMDLISPT lX B] жс 
行 す る こと が で きま せん か ら , 定義 が 終了 
する まで , 文字 を 入力 し 続け ます 。 

e 新版 の 場合 

I/O 版 の DEFINE に 対応 する も の と し て 
は , DE と いう 関数 が あり ます 。 DE に よっ 
て 関数 を 定義 する 場合 の 一 般 形 は 

(DE、 関 数 名 引数 リス ト こ . 関 数 本 体 ) 
と な っ て いて , DEFINE に よる も の より も 
単純 に な っ て いま す 。 先 の LAST は DE を 
使っ て , 

(DE_JLAST_,(L) 
(COND_.((NULL_,(CDR_LL ) ) 
(CAR. .L)) 

(Т. (LAST..(CDR.L))) 
と 定義 する こと が で きま す 。 こ の 新版 の ほ 
う で は , 定義 の 途中 で 改行 を すす る こと が で 
きま すか ら , 見 や すい 状態 で ゲロ グラ ム を 
催 ぉ こと が で きま す 。 

55, 新版 の は うに は DF と いう 関数 が 
あり ます 。 こ れ は , 引数 の 数 が 決ま っ て い 
な い 関 数 を 定義 する た ゆめ の も の で す 。 を その 
- 般 有形 は , 次 の よう に な っ て いま す 。 

(DF. 関数 名 引数 リス ト 、 関数 本 体 ) 
これ は , 形式 的 に は DE と まっ た だ た く 同 じ で す 
が , 引数 リス ト の 要素 の 個数 が 1 個 で な け 
れ ば な ら な いと いう 点 が 異な っ て いま す 。 Z 
LT, その 要素 は , 実際 に その 関数 を 実行 
させ る と き の 引 数 の リス ト を 値 と し て も つ 
ХЭТ. KE 

(DF WHAT(L)(…… ) 

と 定義 きれ て いる WHAT と いう 関数 を 考え 
ます 。 こ の 関数 の 実行 は 適当 な 個数 の 引 
数 を 付け て , 

(WHAT. 31-44) 

ЖЕКЕ ЧЛ» ご の と たと き 。 引数 で ある を 上 は 

(3..1. 4. Л) 


と いう リス ト し と し て 関数 の 本 体 に 渡さ れ て 
いき ます 。 こ の こと を 知っ て お け ば , 与え 
られ た 不定 個 の 引数 の うち , 最大 の も の を 
値 と する よう な 関数 MAX は 以下 の よう に 
定義 で どき ます 。 

(DE. „МАХН. (L) 
(COND... ( (NULL. (CDR. IL) ) 
(CAR. 1)) 

((GREATERP 
(CAR. 1.) 
(МАХН. (CDR. —L))) 
(CAR. 1.)) 
(T. (МАХН. ,(CDR. .L))))) 
ここ で は , MAX は MAXH へ 引数 の リス ト 
を 渡す 役割 し か 果して いま せん が , EVAL 
を 使う と , MAX を 直接 に 再帰 定義 を する 
の GS まず 
(DF. MAX...(L) 
(COND((NULL. .(CDR..L)) 
(CAR...L)) 
((GREATERP. (CAR. 1) 
(EVAL. (CONS. (QUOTE , 
MAX)(CDR. .L))). (CAR. .L)) 
(T(EVAL. ,(CONS. (QUOTE 
MAX) (CDR..L)))))) 


サン プル プロ グラ ム 
リス ト を 使っ た 例題 として, 組み 合わ せ 
に 関す る も の を 考え て み ま し た 。 
問題 | nm 人 の 人 が 集まっ て , プレ ゼン ト の 
交換 を する こと に し まし た 。 誰 も が 自 
分 の 持っ て きた プレ ゼン ト を も ら わ な 
いよ うな 組み 合わ せ を , すべ て 求め る 
プロ グラ ム を 作り な る さい 。 
ひと つの 表わし 方 と し て , 
(ai(i21—n)iZl—n 
の 数 : ai キ aiG キ j の 
と き )) 
と いう リス ト を 考え ます 。 これ は , і(ізі 
~A) と いう 人 が 。 ai と いう 人 が 持っ て きた 
プレ ゼン ト を も ら う こと を 意味 する も の と 
し まず 。 REAR 
(22-4) 
は , 1 の 人 が 2 の 人 の プレ ゼン ト を, 20 
人 が 3 の 人 の プレ ゼン ト を, 3 の 人 が 1 の 
人 の プレ ゼン ト を も ら う こと を 意味 し ます 。 
な お , この よう な 順列 を 完全 順列 と 呼ぶ こ 
と が ある よう で す 。 ま た , 考え 方 の 概略 を 
以下 に 示し ます 。 
(1) n ミ 1 な ら , 答え は 存在 し な い 。 
(2 n=2 な ら , 答え は (2..1) の み 。 
(3 nz3Z 65, 次 の ふた つの 場合 が ある 。 
(3.1) (а, а. -- аһ-:) が (71) の 場合 の 
の ひと つの 答え で ある と き ,k=1~ (n 


(азал s" án) 


ー1 に つい て , ai =k で ある よう な i を 探 
L, そこ を n と し て , ai を 最後 の 要素 に 
する 。 こ れ は n 人 の と き の 答 ぇ の 一 部 
で ある 。 
( 例 ) (3..1_2) か ら は , (3. 4. 2 Д) 
(3.1.4. 2) (4.1. 2. 3) が 得 ら れる 。 
(3.2 k=1— (1—1) 2:007, ai =k の も の 
を 探し て , (3.1) と 同じ 置き 換え を や る 
ЕЗ, ji=k で あっ て も よい 。 こ の よう 
77 (a, az as) の 列 は 次 の よう に し て 
求め られ る 。(a,, azan) が (nー2) 人 
の と き の 答 え の と き , ai=k(k=1~ (n 
ー2) ) と な る も の を 探し た ら 、ai を (n 
ー1) t L, ak を an_i に し て , ak を k に す 
れ ば よい 。 : 
( 例 ) (2._1) か ら は , (1 3 2), (3.2... 
1) が 得 ら れ , その うち , (1—32) か 
ら ,څا‎ (4 3. 2 1),(1 3. 4 2), 
(4 2 3) が 得 ら れる 。 
上 | の (1)~(3) を 考え て 作っ た プロ グラ ム が リ 
スト 6 で す 。 その うち , PP1, PP2 が それ ぞ 
れ (3.1) (3.2) の 手続 き を 行なう も の で す 。 
ちな み に , n=4 の と き の 答 ぇ は 以下 の よう 
に な り ま す 。 
(РР. 4) 
(2 3. 4 1)(% 3 L 2)(2 4 1 8) 


(3.4. 2 1) (3.1.4. 22) (4 1 2 3) 
(4 3 2 1)(% 4. 1-2) (2 1. 4 3) 


ちょ っ と ひと 言 

LISP を 使う と き に メモ リマ ッ プ は あま 
り 必 要 で は な いと 思わ れる の て 省略 し て あ 
り ま す 。 ス ター ト ア ドレ ス は , 1/O 版 が $ 
3000, (コー ルド スタ ー ト ), 新版 が $CO1F 
また は $C9B6( ホ ッ ト ス ター ト ) で す 。 それ 
ぞ れ , ホッ ト , コ ユー ルド スタ ー ト は 不明 で す 。 

ここ で 紹介 し た LISP は , 実際 の LISP の 
サブ セッ ト で し か あり ませ ん 。 し た だ た が っ て , 
この LISP を 使っ て 人 工 知能 を 学ぶ こと は 
無理 ど と 思わ れ ま す 。 それ より も , LISP を 
使っ て , 関数 を 再帰 的 に 定義 し な が ら , Y 
スト と は 何 か 。 LISP と は 何 か を 学ぶ ほう 
が よい で し ょ よう 。 そ うす る うち に 。 サ リス トト 構 
造 が , 複雑 な デー タ を 表わす の に , いか に 便 
利 な も の で ある か が わか っ て る と 思い ます 。 
< 参考 文献 > 
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リス ト 6 プレ ゼン ト 交 換 の や り 方 を 求め る プロ グラ ム 


(DE PP CN) 
COND 

((LESSP N 2) NIL) 

((EQURL N 2) (QUOTE ((2 1222) 

(Т (RPPEND 
(PP1 CPP (SUB1 N)) N) 
(PP2 СРР (SUBI (SUBI N)2) 

(SUBI N)))) 


(DE PPI (L N) 
(COND 
(CNULL L) L) 
(T (ñPPEND 
(SWP (CAR L) 1 N) 
(PP1 CCDR L) N) )) 


(DE SWP CL M N) 
(COND 
(CGREATERP М (SUBI N)) NIL) 
(T (CONS (SWP1 L M N) 
(SUP L Сарот м) N) D) 
1) 


(DE SMP1 (L M N) 

(COND 

(CEQUAL (CAR L) M) 

(APPEND (CONS N (CDR L)) 
(LIST n) )) 
(T (CONS (CAR L) 
(SUP) (CDR L) M N) )) 

1) 


(DE PP2 (L N) 
(COND 
(CNULL L) L2) 


СТ САРРЕМО 
(SMP2 (CAR L) 1 N) 
(PP2 (CDR L) N) )) 
7) 
(DE SMP2 (L H N) 
( COND 
((GRERTERP М (SUBI М2) 
(LIST 
(ñPPEND L 
(LIST CADDI N) M) ) 


22 
(T (CONS 
(MAK M (ñDD1 N) 
(APPEND (5ЫРЗ L M N) 


(LIST CITEM M L) M22) 
(SMP2 L (ADDI M) N) 22) 
32 


(DE SMP3 (L M N) 
(COND 
((EQURL (CAR L) M) 
(CONS N (CDR 1222 
(T (CONS (CAR L) 
{SMP3 (CDR L) M ND 22 
12 


(DE MAK (M N L) 
CCOND 
(CONEP М) (CONS N (CDR L22) 
(T CCONS (CRR L) 
(MAK С50ь1 M) N (CDR L2) 
32 
32 


(DE ITEM (N L) 
(COND 
ССОМЕР N) (CAR 122 
(T CITEM CSUBI М) (CDR 1222 
1) 
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概 要 

FORTH は アメ リカ の 天文 学者 C.H.Moore 
氏 に よっ て , 天体 望遠 錯 な どの 天文 装置 を 
制御 する た め の プ ログ ラミ ング 言語 と し て 
考案 きれ と 言わ れ て いま す 。FORTH と は , 
『 第 4 』 を 意味 する fourth を 縮め た も の で す 。 
етеш, ЖЖ, PIVAZ, SI だ 
続く 第 4 世代 の ュ ン ピュ ー タ で の 主要 言語 
に な っ て ほし いと いう 強い 願い が 込め られ 
て いる の で は な いで し ょ うか 。 

FORTH も , LISP な ど と 同じ 〈, 一 部 に 
狂信 的 と も いえ る 愛好 者 が いる わり に , Z< 
れ ほ ど 有 名 で は あり ませ ん 。 し か し , FOR 
TH を 実際 に 使っ て みれ ば , 確か に これ は 素 
晴らし い 言 葉 だ と いう こと が わか る で し ょ д. 

MZ で 使え を る FORTH に は , テー プア スキ 
ー か ら 販 売 さ れ て いる FORTH/ ぶ と , テク 
ノ ソ フト か ら 販 売 さ れ て いる M (3747 
ム )-FORTH が あり ます 。 後者 の M-FORTH 
の 方 は , I/O 誌 の 81 年 3 月 号 に 発表 きれ ま 
し た が , ЕОЕВТН/501%2512, MZ 用 の も 
の は 発表 きれ て いま せん 。 し か し , ASCI 
誌 に 82 年 4 月 号 か ら , PC80 版 の 解説 が 載っ 
て いま すか ら そ れ を 見 れ ば よい で し ょ う (M 
Z-80 用 の FORTH/ ぶ % の マニ ュ ア ル は , その 
連載 の 第 1 回 目 し 2 回 目 を その まま 転載 し 
だ た も の で す )。 

FORTH は , その 演算 の 基本 を スタ ッ ク 
に お いて いま す 。 ス タッ ク と は , デー タ を 
格納 し て お 〈 HBO < LC, あと か ら 置 いた 
も の を 先 に 取り 出す と いう 人 性質 が あり ます 。 
эф), 次 の 演算 で 使用 する デー タ は , W 
に スタ ッ ク の トッ プ (1 番目 ) に ある こと 
が わか っ て ます か ら , 能率 が よく て 高速 な 
演算 を する こと が で きま す 。 

FORTH を 使用 する 上 で の 最大 の 特色 は , 
その 対話 性 の 良さ で す 。 利 用 者 は , 電卓 を 
扱う の と 同じ で らい の 気楽 き で プロ グラ ム 
を 実行 きせ る こと が で きま す 。FORTH で は 
命令 の こと を ワー ド と 呼ん で いま す 。 を そし 
て , プ ログ ラム する と は , す で に ある ワー ド 
か ら 新 た な ワー ド を 作る こと に 他 な り ま せ 
А. これ は , LISP に お いて , 関数 を 定義 す 
る こと が プロ グラ ム で あっ た の と 似 て いま 
+, しかし, LISP が プロ グラ ム を リス ト の 
形 で 保存 し て お いた の に 対し , FORTH は , 
新た な ワー ド を を その 場 で コンパイル し て し 
まう 点 が 異な っ て いま す 。 こ の た だ ため, ブロ グ 
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ラム の 実行 速度 が 高速 に な り ま す 。 


スタ ッ ク と 逆 ポ ボー ラン ド 記 法 
FORTH で は , 演算 は スタ ッ ク を 介し て 行 
な われ ます 。 したがって, 利用 者 は スタ ッ 
ク の 状態 を , о aine 
ませ ん 。 なお, FORTH に は , — Z REZ 
て お くだ め の パ ラメ ー タ スタ up ワー 
ド を 呼ぶ と き の 帰 り 番地 を 蓄え る た め の リ 
ター ンス タッ ク が あり ます 。 単に スタ ッ ク 
と 言う 場合 は パラ メー タス タッ ク の こと 
を 言っ て いる も の と 思っ て 《 だ さい 。 
FORTH の ワー ド は , す で て が スタ ッ ク に 
対す る 操作 を 行なう も る の で す 。 た と え ぇ ば, 

10 

と 書く 場合, 他 の 言語 で は , それ が デー タ 
て ある こと 以外 に は 何 の 意 味 も あり ませ ん 。 
し か し , FORTH で は , これ も 立派 な 命令 で 
「 ス タッ ク の トッ プ ' に 10 を 積む 」 こ と を 意味 
し ます 。 

また, スタ ッ ク を 演算 の 基本 にし て いる 
た だめ, 命令 の 記述 は 逆 ポ ボー ラジ ド 記 法 に よさ 
っ て な され ます 。 逆 ポー ラン ド 記 法 で は , 


ZFS 
な ど と いう 数 式 は , 

3 5 + 
と いう 具合 に , 演算 子 を 最後 に ちっ て 〈 
る 形 で 表記 され ま す 。 偶然 に もち , この 表記 
は 日 本 語 に 近く な っ て いま す 。 上 の 例 は , 


「3 に 5 を 加え る 」 
と 読む こと が で きま す 。 同 様 に , 
(3+5) ж7+2ж4 


図 7.1 


図 7.2 


と いう 数 式 は , 逆 ポ ー ラ ンド 記法 で , 

Q Бр 7 * 2 4 ж $ 
と な り 。 これ は 。 

「3 と 5 を 加え て , 7 を か け , 
2 と 4 を か け だ も の を 加え る 」 
と 読む こと が で きま す 。 

FORTH で は , 逆 ポ ボーランド 記法 で 書か れ 
た 命令 を 。 ひと つ ず つ ス タッ ク に 対し て 行 
な っ て いる に すぎ ませ ん 。 

十 上 と * が 。 それ ぞ れ , スタ ッ ク の トッ プ 
と 2 番目 を , 加え た りか けた 値 を スタ ッ ク 
に 積む ワード で ある こと を 知っ て いれ ば , 

3 5 + T * 2 4 ж + 
を 実行 する と き , スタ ッ ク が どの よう に 変 
化す る の か を 知る の は 簡単 で し ょ う 。 こ の 
と き の ス タッ ク の 変化 を 図 7.1 に 示し て お 
а 22%, 


€ ме, 


ワー ド の 定義 
FORTH/X や M-FORTH て 使用 可能 な ワ 
ー ド を 表 7.1 に 示し て お きま す 。 
2. な ワー ド を 定義 する 場合 
は 表 7 .1(7) の 定義 用 ワー ド を 用 いれ ば よい わ 
m , š IT, FORTH/> を 使っ た 例 を 
ж\е 


新た な ワー ド を 定義 する た め の ワ ー ド は , 


・ L ; (M-FORTH で は [と ]) で す 。 こ れ を , 
・ つ 名 前 コワ ー ド や 数 の 列 」: 

と いう 形 で 用 いれ ば , その 内 容 が コン パイ 

WENT, 新しい ワー ド が 登録 され ます 。 

だ と えば ,。 スタ ッ ク の トッ プ の 2 乗 を スタ 

ッ ク に 積む な ため の ワー ド SQR は , 


$ 5 +. 7 * 2 4、」*※、. 十 を 実行 する と き の ス タッ ク の 変化 


BE 
Bin ысы Bum 


IF—-(ELSE)— THEN, BEGIN- END, DO~LOOP の 働き 


OIF 4381. | THEN 


OIF 処理 1_ ELSE. 4382. | THEN 


.-508. ФОР. w: 
と 定義 どき ます 。 
な お , FORTH で は , ワー ド と ワー ド の 区 切 
り を 空白 で 識別 し ます 。 こ の た め , ワー ド 
と ワー ド の 間 に は , ひと っ つ 以 上 の 空白 を 入 
れ な けれ ば な り ま せん 。 名 前 が 空白 で ある 
よう な ワー ド を 定義 する こと も で きま せん 。 

FORTH は , PASCAL な どの 構造 化 ゲ ロ 
グラ ミン シング 言 語 よ り も 。 ず っ と デブ ログ ラム 
を 構造 化す る の に むい て いま す 。FORTH の 
むち ゃ くち ゃ と も いえ る 構文 (プロ グラ ム 
の どの 部 分 を 取り 出し て も , その 部 分 が 何 
か の 実行 を 行なう ) 8, プロ グラ ム を モジ 
ュー ル 化 する の に 便利 で す 。 

し た が っ て , FORTH に お ける 一 般 的 な 
プロ グラ ミン グ の 態度 は 。 目的 に 必要 な 手 
段 を 想定 し , 手段 の 積み 重ね で 目的 を 満た 
す プ ログ ラム を 作る と いう , ボトム アッ プ 
な も の に な り ま す 。 こ の た だ め , 使用 する ワ 
ー ド は , すべ て , 定義 きれ て いる 必要 が あ 
уже 

ST, ブロ グラ ム を 構造 化す る た め に は , 
条件 分 岐 と 繰り 返し も を する た め の ワ ー ド が 
必要 で す 。 を そのため に , よく 使わ れる ワー ド 
l4, IF~(ELSE)~THEN,BEGIN~END, DO 
ーLOQOP で す 。 そ れ ぞ れ は ,PASCAL で の IF 
文 , REPEAT 文 ,FOR 文 に 対応 し て いま す 。 
これ ら の ワー ド の 働き は , FORTH で 新 し 
い ワ ー ド を 定義 する た め に , ぜひ と も 理解 
し て お か ね ば な り ま せん 。 それ ら の 働き を 
文 で 説明 し て も わか り づ らい の で , 制御 の 
流れ を 図 7.2 の 流れ 図 に 示し て お きま す 。 な 


スタ ッ ク の トッ 
が 0 か ? 
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スタ ッ ク の トッ プ 
が 0 か ? 


スタ ッ ク の <> 
o ? 


(SBEGIN. 処理 1_END 


スタ ッ ク の トッ プ つ ェ 
スタ ッ ク の 2 番目 っ J 


GE) ①-③ で 条件 判断 を 1 回 する ご と に 、 ス タッ ク の トッ プ が 取り 去ら れる 。 
(《④ で の 1I,J は 便宜 的 な 変数 。 実 際 に は . ス タッ ク の トッ プ と 2 番目 の デー タ は リタ ー ン スタ ッ ク に 積ま れる 。 


i, これ ら 制 御用 の ワー ド は : Е; (M-F ク の トッ プ が 0 で な い 
ORTH で は [と ]) に よる 定義 の 中 で し か 用 Ls 
いる こと は で きま せん 。 ЖОЙ, スタ ッ な お , 


表 7.1 FORTH の ワー ド ワー ド 名 が 上 が FORTH/ , 下 が M-FORTH 


ー1 を 出力 する ワー ド EX の 定義 で す 。 
ТЕН, ルー プ カ ウ ンタ の 値 を スタ 
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と き は , 0 一 9 を 出力 ッ ク に 積む た め の ワ ー ド で す 。 


ЕХ. 0. =. IF. ELSE 


i dos 


100-00-41... LOOP. THEN; 


оста | xekê | аж 


ワー ド 名 スタ ッ ク 変 化 


(1) 出 力 用 ワー ド ( 例 で は HEX と 書い て ある も の の 基数 が I6, 他 は 10) 


スタ ッ ク の トッ プ を その と き の 基 数 (BASE) 
で 出力 する 。 


スタ ッ ク の トッ プ を 文字 列 が 格納 され て いる 
先頭 の アド レス , スタ ッ ク の 2 番目 を 文字 数 
と みて , 文字 列 を 出力 する 。 


改行 と 復帰 を 行なう 。 


スタ ッ ク の トッ プ の 下位 8 ビッ ト を , その と 
き の 基 数 で 出力 する 。 


300.-С. 
($012C) ($20) 


$8000 [OA] 
$8001 [EF] の と き 


HEX—8000? EFOA 


[ r 


ABS スタ ッ ク の トッ プ の 絶対 値 を 求め 。 ス タッ ク 


に 積む 。 


スタ ッ ク の トッ プ の 2 の 補 数 を 求め 、 スタ ッ 
ク に 積む (符号 反転 )。 


スタ ッ ク の トッ プ と 2 番目 の うち , 大 きい ほ 
う を スタ ッ ク に 積む 。 


күн スタ ッ ク の トッ プ と 2 番目 の うち , 小 さい ほう 


を スタ ッ ク に 積む 。 


(3 論理 演算 (ビッ ト ご と ) 用 ワー ド ( 例 で は 基数 が 16) 


215. 


HEX. .1241. , 
ECHO 


ー ド と みな し て , それ に 対応 する 文字 を 出力 
する 。 


スタ ッ ク の トッ プ を 符号 な し の |0 進 数 と みな 
し て 出力 する 。 


スタ ッ ク の トッ プ を 符号 な し の 1I6 進 数 と みな 
し て 出力 する 。 2 


(2) 算 術 演算 用 ワー ド ( 例 で は , 基数 は すべ て 10) 


スタ ッ ク の トッ プ と 2 番目 を 加え て , スタ ッ 
ク に 積む 。 


スタ ッ ク の 2 番目 か ら ト ッ プ を 引い て , スタ 
ッ ク に 積む 。 


スタ ッ ク の トッ プ と 2 番目 を か け て , スタ ッ 
ク に 積む 。 


スタ ッ ク の トッ プ を アド レス と みな し て , そ мю AND スタ ッ ク の トッ プ と 2 番目 の , ピット ご と の 
の 内 容 を 出力 する 。 "m БЕР — mam 論理 積 を 求め , スタ ッ ク に 積む 。 
OR ов = 
スタ ッ ク の トッ プ と 2 番目 の ,、 ビット ご と の 
スペ ー ス を 出力 する 。 pR- аат 
- JEEE, | 論理 和 を 求め 、 ス タッ ク に 積む 。 
スタ ッ ク の トッ プ の 個数 だ け , スペ ー ス を 出 арш RR スタ ッ ク の トッ プ と 2 番目 の , ビッ ト ご と の 
"— EEA- gos, 排他 的 論理 和 を 求め 、 ス タック に 積む 。 
スタ ッ ク の トッ プ の 下位 8. ビ ピット を ASCII コ COM сом 


スタ ッ ク の トッ プ の 1 の 補 数 を 求め 。 ス タッ 
ク に 積む (ビッ ト の 反転 )。 


スタ ッ ク の トッ プ と 2 番目 の , ビッ ト ご と の 
論理 積 を 求め 。 それ を ピット 反転 し た も の を 
スタ ッ ク に 積む 。 


NOR スタ ッ ク の トッ プ と 2 番目 の ,。 ビット ご と の 
論理 和 を 求め , それ を ピッ ト 反 転 し た も の を 
スタ ッ ク に 積む 。 

каа SWAN スタ ッ ク の トッ プ の 上 位 バ イト と 下位 バイ ト 

JABGO] ,[cDABl | を 変換 し た も の を スタ ッ ク に 積む 。 
(4 比較 用 ワー ド 


スタ ッ ク の トッ プ と 2 番目 が 等 し いと き は 真 
= (0%, そう で な いと き は 偽 (0) を スタ ッ ク に 積 
v. 


スタ ッ ク の 2 番目 が トッ プ よ り 小さ いと き は 
WR, そう で な いと き は 信 (0) を スタ ッ ク に 
積む 。 


a テ b が q 祭 り r の と き 
ж 


スタ ッ ク の 2 番目 を スタ ッ ク の トッ プ て 割り , 
その 商 を スタ ッ ク に 積む 。 


а+ьља Уго > а 
Z MOD 


Epl БЫ 


スタ ッ ク の 2 番目 を スタ ッ ク の トッ プ て 割り , 
商 を トッ プ に , 余り を 2 番目 に 積む 。 


スタ ッ ク の 2 番目 が トッ プ よ り 大 きい と き は 
я), そう で な いと き は 偽 (0) を スタ ッ ク に 
積む 。 


スタ ッ ク の 2 番目 が トッ プ よ り 小さ いか 等 し 
いと き は 真 (|) を ,。 そう で な いと き は 偽 (0) を ス 
タッ ク に 積む 。 


スタ ッ ク の 2 番目 を スタ ッ ク の トッ プ て 割り , 
余り を スタ ッ ク に 積む 。 


スタ ッ ク の 2 番目 が トッ プ よ り 大 きい か 等 し 
いと き は 真 (|) を , そう で な いと き は 偽 (0) を ス 
タッ ク に 積む 。 
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表 7.1 (つづ き ) ワ ー ド 名 は 上 が FORTH/S , 下 が M-FORTH 


ワー ド 名 


スタ ッ ク 変 化 意 味 
<> ГЕН “TF | スタ ッ ク の 2 番目 と トッ プ が 等 し く な いと き 


は 真 (|) を , 等 し いと き は 偽 (0) を スタ ッ ク に 積 


> 
ング | ВВ ве |6 
NOT „= ント | ラック の トッ プ が 偽 0 な ら 真 を , そう で 
E] un Era) な けれ ば , 偽 (0) を スタ ッ ク に 積む 。 
pt LA CL スタ ッ ク の トッ プ が 0 な ら 真 (I) を 。 そう で な 


けれ ば , 偽 (0)0 を スタ ッ ク に 積む 。 NOT と 同じ 。 


(6) メ モリ 操作 用 ワー ド 


@ 55000 [8B] o а スタ ッ ク の トッ プ を アド レス と みな し て , Ж 
の アド レス の 内 容 (2 バイ ト ) を スタ : 


@ ッ ク に 積 
| ° ا ا‎ |6. 
! жез $8001 [ABI スタ ッ ク の トッ プ を アド レス と みな し て , 2 


5 番目 を , その アド レス へ 転送 する 。 
' | m 


$8ooo[AE] 
$8001 с DER 


ED ED 


@ で 1 バイ ト の み ス タッ ク へ 積む 。 上 位 パ イ 
ト は 0。 


スタ ッ ク の トッ プ を 取り 去る 。 


шыкса 
スタ ッ ク の トッ プ を 複製 し て , スタ ッ ク に 積 
v. 


! で スタ ッ ク の 2 番目 の 下位 バイ ト の み 転 送 
する 。 


с! の 実行 後 S8000 [CD] 
с! 


в ma 


277777” 


58000 А8! 一 Em |х» ッ ク の トッ プ を アド レス と みな し て , t 
pa]. の アド レス の 内 容 に スタ ッ ク の 2 番目 を 加え 
アン ンプ 


スタ ッ ク の トッ プ と , 2 番目 を 交換 する 。 


スタ ッ ク の 2 番目 を 複製 し て , スタ ッ ク に 積 
む 。 


+! で 。 ス タッ ク の 2 番目 の 代り に 1 を 加え 
る 。 


る 。 
sung - 
ГАМЕ 


en 
777777 


+! €, スタ ッ ク の 2 番目 の 代り に 一 1 を 加 
える 。 


78 - 
БЕШ our 


スタ ッ ク の トッ プ か ら 3 番目 を 回 転 さ せ て , 
3 番目 を トッ プ に も っ て くる 。(*)M-FORTH 
で は , スタ ッ ク 全 体 で 回 転 を 行なう 。 


Fem 


スタ ッ ク の トッ プ を アド レス と みな し , その 
アド レス と , ひと つ 先 の アド レス の 内 容 を 0 
に する 。 


зи 88 - 


pe ys 


(バラ メー タ ) スタ ッ ク 


スタ ッ ク の トッ プ を 配列 の 先頭 アド レス , 2 


м(0 
… | WUEB 
ca hub | OT SS MADE US, йе дар Ма 番目 を 添字 と みな し て , 配列 の 値 を スタ ッ ク 
リタ ー ン スタ ッ ク で 使用 され る リタ ー ン スタ ッ ク に 積む 。 MOZ] に 積む 
= ーー シル | Ent. 
yes A! s スタ ッ ク の トッ プ を 配列 の 先頭 アド レス 。 2 
スタ ッ ク E y y d 
di リタ ー ン スタ ッ ク の トッ ‚ (パラ メー ме E : de 
) "E E А EFA А! 番目 を 添字 と みな し て , 3 番目 で 与え られ る 
リタ ニン ズ タ ッ ク yu L3 デー タ を , その 位置 へ 格納 する 。 
777777 7777777 
HL の 内 容 が 3 の と き | HL レジ スタ の 内 容 を スタ ッ ク に 積む 。 vun um SsoFF)| スタ ッ ク の トッ プ の バイ ト 数 だ け , 3 番目 か 
PUHL H, し レジ スタ の 内 容 が それ ぞ れ 上 位 , 下位 バ [$100 | ら 2 番目 の アド レス へ , アド レス を 増加 させ 
Ed イ h。 MV ж な が ら 、 メ モリ の 内 容 を ブロ ッ ク 転 送 する 。 
POHL PUHL の 後 。 (se000 ~ SSOP оодо) スタ ッ ク の トッ プ の バイ ト 数 だ け , 3 番目 か 
スタ ッ ク の トッ プ を HL レジ スタ に 入れ る 。 MV 一 ら 2 番目 の アド レス へ , アド レス を 減少 させ 
PSl еее та) MV 一 な が ら , メモ リ の 内 容 を ブロ ッ ク 転 送 する 。 


DDUP 
スタ ッ ク の トッ プ と 2 番目 を 複製 し て スタ ッ 
EH で ク に 積む 。 OVER OVER と 同じ 。 
2OVER 


H- ЕҢ с A372018BtBBLT, 23 2H 


[£] ЗОУЕН スタ ッ ク の 4 番目 を 複製 し て , スタ ッ ク に 積 


E. 


スタ ッ ク の 内 容 を 表示 する 。 ス タッ ク の 内 容 
は 変わ ら な い 。 


スタ ッ ク を 空 に する 。 


52 oniMz 1984.5. 


(7 定義 用 ワー 


スタ ッ ク の トッ プ と 2 番目 の 
和 を 出力 する ワー ド ADD の 定 


新た な ワー ド を 定義 する 。 一 般 形 は 
: 一 名 前 すでに 定義 され て いる ワー ド や 数 の 列 」: 


әдеті Ne [名 前 すでに 定義 され て いる ワー ド や 数 の 列 -.] 
MOCODE NEXT | スタ ッ ク の トッ уюш | 機械 語 に よる ワー ド を 定義 する 。 一 般 形 は , 
ト を プリ ンタ へ 出力 する ワー | MCODE. 名 前 ワー ド や !6 進 数 (1 バイ ト ) の 列 _NEXT 
ド LP の 定義 MCODE_LP_POH | МІ. Фй. .1 バ イト で 表 わ せる 数 の 列 。]M 
мі JM | Lp cp sr. ot NEXT RET(C9) は 書か な い 。 
CONST 1 と いう 値 を 持つ 変数 
$ は 
ONE を 定義 する 。 жиекте 


1--00М5Т. ONE 


"lic | CONST. EHB 


変数 を 宣言 する 。 一 般 形 は 


VAR X と いう 変数 を 宣言 する VAR 変数 名 
VAR? VAR—X (*)M-FORTH СЗ, スタ ッ ク の トッ プ の 値 が 変数 の 初期 


値 に な る 。 


« BUILDS 
DOES» 


2 次 元 配列 を 宣言 する た め の 
ワー ド DIM を 定義 する 。 

: DIM— BUILDS 2 ж. 
ж. ALLOT. DOES». < 


定義 用 の ワー ド を 定義 する 。 一 般 形 は 
: 一 名前. く BUILDS_」 ワ ー ド や 数 の 列 _DOE 
S>; 


特集 クリ ー ン コン ピュ ー タ と 言語 


表 7.1 (つづ き ) ワ ー ド 名 は 上 が FORTH/, 下 が FORTH 
ワー ド 名 例 意 味 
ARRAY | 大 き さ が IO(20 バ イト ) の | 1 次 元 配列 を 宣言 する 。 一 般 形 は (アポ スト ロフ イィ) M AU Өсе "の 次 に くる ワー ド や 変数 な どの 先頭 アド レス 
1 次 元 配 列 A を 宣言 する 。 з E を スタ ッ ク に 積む 。 こ の アド レス か ら , 実際 の 
NU 1 2B58) が スタ ッ ク 
10—ARRAY—A EARRAN en ^^ | 機械 語 が 書か れ て いる 。 
а МЕХ ы. & = > N 
辞書 ポイ ンタ の 示す アド レス か ら 2 バ イト 確保 
DEO. 120,4: g 3 NEN (= T - 
は , 基 数 が 10 の と き の e کی‎ 時 的 に [ ]Jhoo—-Fex し , 辞書 ポイ ンタ を 1 進め る 。 
ажы s: (コン マ ) FORTH/ ぶ の 1_ALLOT と 同じ 。 
( と ) で 囲ま れ た 文字 列 は コメ ント と な る 。| |00 そ の 他 の ワー ド 
:—X—* (—KAKERU) | 一 般 形 は 
c; (文字 列 ) BASE 8 BASE. ! 
£ # 9, 最初 の ( と 文字 列 の 間 に は 空白 を お く 。 以後 の 入力 を 8 進数 に 基数 (8, 10, 16) が 格納 され て いる アド レス 。 
BASE よる も の と する 。 
“АВС” ` £ の 間 が 文字 列 で ある こと を 示す 。 こ の 
と き , 文字 列 の 格納 開始 アド レス と , 文字 数 EDIT 
—- 3 | | が スタ ッ ク に 積ま れる 。 テキ スト エディ タ へ 制御 を 移す 。 
(8) 制 御用 の ワー ド (ワー ド の 定義 中 に の み 使用 で きる ) Mu 
スタ ッ ク の トッ プ が 0 な ら IF 一 スタック の トッ プ が 真 (0 以外 ) の と き の 
FALSE OM 外 な と TRUE を | 処理 ELSE- ス タッ ク の トッ プ が 偽 (0) の と SAR カセ ッ ト テ ー プ か ら , エディ タ で 作ら れ た ソー 
2 -ogRoTFALSES | き の 処 理 一 THEN の 形 で 使う 。ELSE 以下 が 必 スプ ログ ラム を ロー ド す る 。 
Nr ç й LOAD 
ELSETRUE'..THEN TYPE U: | 要 な いと き は ELSE は 省く 。 
9 か ら 1 ま で を 出力 する ワー ド жаа " " 
D を 定義 する END の 実行 時 に スタ ッ ク の トッ プ が 真 (0 以 SAE カセ ッ ト テ ー プ に , エディ タ で 作っ た プロ グラ 


+ D—9—BEGIN—DUP—, — 
15-—DUP—NOT.—END— 
DROP; 


外 ) に な る まで BEGIN と END の 間 の 処理 を 繰 
り 返 す 。 


ム を セー プ す る 。 


0 か ら 9 ま で を 出力 する ワー ド 


(パラ メー タ ) ス タッ ク の トッ プ ,2 番 目 を , それぞれ 初期 値 , 
終値 と し て リタ ー ン スタ ッ ク に 積み , LOOP が 実行 され る ご 


スタ ッ ク の トッ プ を 機械 語 サ プ ブルー チン の 先頭 アド レス と 
みな し て , そこ へ ジャ ンプ する 。 


2—+LOOP—; 


も の 。 


ЕЛЕ スタ ッ ク の トッ プ が 偽 (0) の と き の 処 理 
ELSE__ ス タッ ク の トッ プ が 真 (0 以外 ) の と 
& VER. THEN 

の 形 で 使う 。 


- 


ES 


DO 一 LOOP 実 行 時 の カウ ンタ の と る べき 終値 
を スタ ッ ク に 積む 。 


(9)8 HERR TEPBZ — F 


FORGET 


FORGET 


FORGET ワ ー ド 名 
の 形 で 使う 。 指 定 さ れ た ワー ド 以 後に 定義 さ 
れ た ワー ド を すべ て 消去 する 。 


HERE 


次 に ワー ド が 登録 され る べき アド レス (辞書 
ポイ ンタ の 内 容 ) を スタ ッ ク に 積む 。 


МАН--Х--10--А110Т 

X と いう 名 前 で 示さ れる ア 
ドレ ス か ら 10 ワ ー ド 分 確 
保 す る 。 


スタ ッ ク の トッ プ の 値 だ け 辞 書 ポ インタ を 進 
め る 。 
作業 用 の 領域 を 確保 する の に 使用 する 。 


| 


スタ ッ ク の トッ プ を 辞書 ポイ ンタ の 示す アド 
レス と , その アド レス の 次 の アド レス に 格納 す 
る 。 辞 書 ポ イン タ は 2 進む 。 


スタ ッ ク の トッ プ の 下位 バイ ト を 辞書 ポイ ン 
タ の 示す アド レス に 格納 する 。 辞 書 ポ イン タ は 
1 進む 。 


(0 その 他 の ワー ド (FORTH/ ぶ の み ) 


P を 定義 する 。 と に カウ ンタ を 1 だ け ま す 。 カ ウン タ の 値 が 終値 以上 に な る (*W )M-FORTH で は REG と いう 名 前 の エリ ア を 介し て レジ 
S-P—10—0—00—1—.— | まで DO と LOOP の 間 を 繰り 返す 。LEAVE は , カウ ンタ の 値 USR(*) スタ の 値 の 受け 渡し が で きる 。 
LOOP—; と 終値 と 等 し くす る 機能 が ある 。 REG の 配置 
VERIFY 
DO 一 LOOP 実 行 時 の カウ ンタ の パラ メ 
н че wt pe カセ ッ ト テ ー ブ の ベリ ファ イ を する 。 
І : VERI 
NAM スタ ッ ク の トッ プー1 だ け の 個数 | BEGIN. AME. WHILE_. ス タッ ク の トッ プ が INKEY 
ОН өкім. 真 (0 以外 ) の と き の 処理 . REPEAT キー が 押さ れ て いれ ば , その ASCII コ ー ド を , 
WHILE 42 -ECHO. REPEAT | の 形 で 使う 。REPEAT が 実行 され る と , 制御 GETKY 押さ れ て いな けれ ば 0 を スタ ッ ク に 積む 。 
ЖЕ (2, BEGIN の 直後 に 移る 。 
DO T で せ の s 
(LEAVE) | で プリ ント する ワー ド Pe& | DO~LOOPT, カウ ンタ の 増減 を 1 で は な く , INPUT 数 値 入力 が ある まで 待ち , そ の 値 を スタ ッ ク に 
定義 する 。 スタ ッ ク の トッ プ だ け カ ウン タ を 増加 させ る 積む 。 
52P210—0.—D0—I—.— 20) (*)M-FORTH で は 文字 で も よい 。 


HEX. 15-26-25. 基数 を 16 に する 。 す な わ ち , 数 を 16 進 数 と みな 


HEX 003B す 。 
DEC..15. 26. t —, 基数 を 16 に する 。 す な わ ち , 数 を 10 進 数 と みな 
DEC. 
41 す 。 
OCT OCT.—15. 26 4. ., 基数 を 8 に する 。 す な わ ち , 数 は 8 進数 と みな 
000043 す 。 
LIST 現在 まで に 登録 され た ワー ド を 逆 コ ン バ イ ル 
し て 表示 する 。 
EXEG エディ ッ ト バ ッ フ ァ の 内 容 ( エ ディ タ で 作っ た 
プロ グラ ム ) を 実行 する 。 
сів エディ ッ ト バ ッ フ ァ を , メ モリ と し て 使え る よ 


うに する 。 


BYE 


モニ タ ヘ へ ジャ ンプ する 。 


LOCATE. 


10.10. LOCATE. 42 
E 


Air スタ ッ ク の 2 番目 ,. ト ッ プ を , thën, x, y 座 標 
(10, 10) の 位置 に を を 書く 。 


と みな し て , そ の 位置 に カー ソル を 移動 する 。 


SCREEN 


スタ ッ ク の 2 番目 , оге оху 
と みな し て , その 位置 に ある 文字 の ディ スプ レ 
イコ ー ド を スタ ッ ク に 積む 。 


LPRINT 


SFORTH 


文字 の 出力 を 画面 か ら ブ プリ ンタ へ 切り 換え る 。 


文字 の 出力 を プリ ンタ か ら 画 面 へ 切り 換え る 。 


FORTH を それ 自身 , 最近 の ワー ド ま で を 含 
め て カセ ッ ト テ ー プ に セー プ す る 。 
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特集 MZ は コト バ の 天才 で ある 


表 7.1 (つづ き ) 表 7.2 エディ タコ マン ド ( 主 な も の の み ) 


意 味 コマ ンド 意 味 
A 
エディ ッ ト モ ー ド より 抜け て FORTH 5 
スタ ッ ク を トッ プ か ら 順 に y X と する と 。 1 uito PES бы 
20.5 £ LT, xcosz 一 yszzz を 2 番目 に ,x | F t- 
sinz + ycosz F y 712406), L Tn ライ ン ポ イン タ の 指す 行か ら n 行 分 表示 する 。 
スタ ッ ク を トッ プ か ら 順 に z, y, x と する と ,z Tn ライ ン ポ イン タ は 変化 し な い 。 
を 0.5* 単 位 と LT ui を 2 番目 に , z + 
ー1 55 = ` n 
ма スー ライ ン ポ イン タ を n 行 先 に 進め る (+n) か .n 行 戻す (ーn)。 
スタ ッ ク の 2 番目 . ト ッ プ を x,y 座 標 と みな し て , tn 
その 位置 の ドッ ト を セッ ト す る 。 Ts ライ ン ボ イン タ の 指す 行 の 前 へ ,s と いう テキ スト を 挿入 する 。 ラ イン ボ 
スタ ッ ク の 2 番目 .,. ト ッ プ を xy 座標 と みな し て , T[CRIS | イン タ は 変化 し な い 。 
その 位置 の ドッ ト を リセ ッ ト す る 。 n 
ライ ン ボ イン タ を 先頭 か ら n 行 目 に セッ ト す る 。 
CORO AM スタ ッ ク を トッ プ か ら yz,Xz, yi x: と する と , Рп 
線 を 引く z A(x Y DAD (xa, y) へ 直線 を 引く 。 Kn 
ライ ン ポ イン タ の 指す 行か ら n 行 削除 する 。 
仮想 VRAM を クリ ア し . 仮想 VRAM の スイ ッ Dn 
チ を ON に する 。 ESf Ж у 
ツー ステ キス э JV i; v テー に セー v 
仮想 VRAM の スイ ッ チ が ON な ら 。 仮想 VRAM wi テキ スト を f と いう ファ イル 名 で カセ ッ ト テ セ する 
の 内 者 を VAM2 可 し 。 仮想 VRAM の スイ ッ E37 
チ を OFF に する 。 
カセ ッ ト テ ー プ の ソー ステ キス ト を ロー ド す る 。 
仮想 VRAM の スイ ッ チ を 切り 換え る 。 仮 想 VR L шы PAE 
AM が ON な ら , SETG, RESG, LINE は 仮想 VR 
AM 上 に 行なわ れる の て 画面 に は 現われ な い 。 ソー ステ キス ト を 実行 する (FORHTH/ ミ で は , 実行 モー ド で EXEC が あ 
ab LIMIT バラ メー タス タッ ク , リ ター ンス タッ ク の BO F る )。 
パラ メー タス タッ ク , デー タス タッ | TTOM ア ドレ ス ( 空 の と き 指 し て いる アド レス ) 
ク の ボトム アド レス を ,a,b と する 。 を 変更 する 。 Р Ж 
ライ ン ポ イン タ の 指す 行 を エディ ッ ト す る 。 
3 A *+°._АРГҮ(З スタ ッ ク の トッ プ と 2 番目 で 表わさ れる 文字 列 トニ タデ | | 
る 4 一 + と 同じ 。 (* の 項 参照 ) と, 同じ ワー ド を 実行 する 。 I" 5 ライ ン ポ イン タ の 指す 行 の 後 へ ,S と いう テキ スト を 挿入 し , ラ イン ポイ 
リタ ー ン スタ ッ ク の BOTTOM ア ドレ ス が 格納 < ЗОЖ. 
され て いる アド レス 。 上 側が FORTH/, 下 側 が M-FORTH の コマ ンド 
バラ メー タ の スタ ッ ク の BOTTOM ア ドレ ス が 
格納 され て いる アド レス 。 と な り ま す 。 [CLR けが 消去 る れ て , 
辞書 ボイン タ 。 を 使え ば 文 た 列 を 消 —: WD! -BDAYS 
過す まるこ と が で きま も がり ます 。 
す 。 上 の 例 に 対し て , この よう に ,。 P コ マン ド は, 現在 入力 し た 
エディ タ р (ССК [CR] ば か り の 行 を す で 修 正す る の に よく 使わ れ 


FORTH の プロ グラ ミン グ は 対話 形式 で と する と, [СІВ |] が 押さ れ た 部 分 に 対応 す ます 。 
行なう こと が 基本 で す が , 長い プロ グラ ム る 位置 か ら , その あと に 入力 し た 文字 数 だ 
を 作る 場合 な ど , エディ タ を 使用 する こと p б - 
SAF, желени, тә リス ト 7 カレ ンダ ー を プリ ンタ へ 出力 する プロ グラ ム 
グラ ム の 一 部 だ け を 修正 で きる の で , エラ popu m9 : . rper nur нарад 
ー が あっ た 場合 , ワ ー ド の 定義 を 最初 か ら елі А а ац 
や り 直 す 手 間 を 省く こと が で きま す 。 表 7.2 '2 ARRAY MM ЖҮРЕ SAMT 2-7 
に エディ タコ マン ド の 一 覧 表 を 示し ます 。 : ме MONTH ñ? ; 3 : LC 11 LPOUT ; 
FORTH/X $ M-FORTH も ライ ン ポ イン タ т. ; ` SS Бк гыл: 
に よっ て テキ スト を 管理 する ライ ン エ ディ ーー ドーレ S ف‎ ащ 
タ で す 。 ど ちら の エディ タ も 似 か よっ た 機 
能 を も っ て いま す が ,。 FORTH/ に は , P 
コマ ンド と いう , 行 の 内 容 を エディ ッ ト す 
る コマ ンド が あり ます 。 これ に つい て 少し 


ELSE 365 + THEN LOOP % 18 >= IF 1 ELSE 2 THEN SPCS 
ELSE DROP THEN ; 
説明 し ます 。 い ま ラ イン ポイ ンタ の 指す 行 が 


: COUT 
: INIT з 18 MOD DUP а > IF 
31 12 8 DO DUP I mf LOOP : 48 + LPOUT ELSE DROP THEN 
1- 3n 30 5 п? : 48 + LPOUT 
зе вм: зе 18 n? Н 
: 13 DuP SPS COUT ; 


1: 
2: 
э: 
4: 
5: 
6: 
2: 
8: 
9: 
10: 
11: 
12: 
13: 
14: 
15: 
16: 
12: 
18: 
18: 
20: 


: USET s : PRDAY 
WDW?_ADAYS : URU? IF 29 1 n? : SWAP DUP 9 > IF DUP З £ 
ELSE 28 1 H? THEN : SPCS THEN | - SWAP 1 + 1 
で ある 上 と し ます 。 こ の 上 き 。 . DO DUP I + 7 MOD @ = IF 
P ZZZZZ VZ B[GCR] ucc РУТ Ф IF н e d ues 
s —— a 1 DO I 1 - ne + LOOP : ; 
と 入力 する と , ノ 以 外 の 文字 を 書い た と こ Ет DMDP Тен : ные dos dew s 
ろ が 置き 換 わ っ て , : CALM 


: DAYS SWAP MDAYS + 1 = ; : DUP TITLI DUP ROT SWAP 
: ADAYS : 1 WOW? SWAP 1 - пе PRDñY 
ІМІТ КОТ DUP USET YEñRS ; 
ROT ROT DAYS + Н : CALY 
1 + SWAP DO DUP I CRLF CRLF 
: SPOUT 32 LPOUT ; Н CALM LOOP 
: CRLF 13 LPOUT ; ; 


Cau WDW!. ,BDAYS 
と な り ま す 。 ま た , この 行 に 対し て 
P プ ノノ [INST]O O[CRI 
と する と , [INST] を 押し た 部 分 に 対応 す 
る 位置 に それ 以後 の 文字 列 が 挿入 きれ て , 
eas WDOOW !.,.BDAYS 


9SSRGSSSNSDSSN 
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サン プル プロ グラ ム 

FORTH/ ぶ の エディ タ を 使っ て , カレ ン 
ダー を プリ ンタ へ 出力 する プロ グラ ム を 作 
っ て み ま し だ 。 こ れ を リス ト 7 に 示し ます 。 
この プロ グラ ム は , 1984 年 以降 の 特定 の 月 
の カレ ンダ を 出力 する プロ グラ ム CALM が 
核 に な っ て いま す 。 あ る 特定 の 月 か ら 特 定 
の 月 まで の カレ ンダ を 出力 する プロ グラ ム 
CALY は ,CALM を DO 一 LOOP で 繰り 返し 
た も の に 過ぎ ませ ん 。 こ の プロ グラ ム の 使用 
法 は , プ ログ ラム を コン パイ ル し た だ あと, 実 
行 モ ー ド で 

1998. 3 САІМ  H998 年 3 月 の カレ ンダ | 
2001. 4. 6. .CALY I2001 年 4 月 か 56 月 の カレ ン 銘 
な ど と し ます 。 図 7 .3 は , 
1984 3. 7. .CALY 
と し た と き の 実 行 結果 で す (確か に 合っ て 
いる )。 

Жы, プログラム 中 , WDW ? は ある 特定 
の 年 月 日 が 何 曜 び で ある か を 求め る も の で す 
(年 一 月 一 日 WDW ? で 使用 する と スタ ッ 
ク の トッ プ に 0 一 6 の 値 が 積ま れる 。0 が 日 
Ш) 2, カレンダ を 書く た め に は , 指定 す 
る 月 の 1 日 が 何 曜 で ある か が わか れ ば よい 
DT, CDR, 少し 無駄 ほし いえ ます 。 
047.3 1984 年 3 月 か ら 7 月 の カレ ンダ ー 


BBS one 
89 сон 


Ngo-m 、 
PES 
мәс 
КТҮҮ; 
боса» 
Boso 
SS oo» 
ұз. a 
Sz. 


DDTa 
8Ф5и» 


+ 本 
2 3 
3 19 
16 12 
23 24 
38 31 


9 
N Xx 
1 
28 
14 15 
21 22 
28 29 


NS o 


ым * 
- 
uo» 
- 
ON 


SR 
88 


OSuo-m «i 
9 oNx» 
83 
ISu» 
DOZ a» 
Усни» 
бо» 
NE 
SY Fur» 


ちょ っ と ひと 言 


FORTH も LISP と 同じ く , 代入 文 の な い 
言語 で す 。 こ の 点 は , 今 は や り の LOGO に 
つい て も 言え る こと で す 。 し だ た が っ て 。HBA 
SIC を 知っ て いる 人 が FORTRAN や PASC 
AL を 学び や すい よう に ,LOGO や LISP を 
知っ て いる 人 が FORTH を 学ぶ の は 簡単 で 
し ょ う 。 LISP に し ろ FORTH に し ろ , BA 
SIC と は ひと 味 違っ た 世界 が . そこ に は あ 
り ま すか ら , 一 度 で らい は 使用 し て みる の 
が いい で し ょ う 。 き っ と 病み つき に な る か 
b ЕЛ 

Жы, 書き 忘れ まし た が , ЕОВТН/>, 
M-FORTH の スタ ー ト 番地 は , どちら も $ 
1200( コ ユー ルド スタート) で す が , 
今 ま で に 登録 きれ て いる ワー ド は 消去 きれ 
ませ ん 。M-FORTH に は ホッ トス ター ト も 
あっ て , それ は $1268 か $1925 で す 。 
< 参考 文献 > 
° 大 半 宮 美男 他 『M-FORTH/MZ』 

1/О, 81 年 3 月 号 。 

о MZ-80 FORTH- マニ ュ ア ル 
o 原 道 富 『FORTH』 ト ラン ジス タ 技 術 , 

81 年 2 月 サー3 月 号 。 

о Jr] 『 プ ログ ラム 表記 か ら 見 た 言語 比較 』 

information, 8443) 


それ ぞ れ の 言語 に よる ソー ト 
これ まで に , GAME, PALL, FORM, 
к PASCAL, ТІ,/1, LISP, FORTHE ク 
リー ンコ ンピュータ の ため の 言語 の 紹介 を 
し て きま し だ た だ 。 を それぞれ の 言語 に は 得意 な 
分 野 し と そう で な い 分 野 が あり ます 。 しかし, 
どれ も 同じ ゲロ グラ ミン グ 言 語 で すか ら 。, 
ちょ っ と 工夫 すれ ば , 何で も や ら せ る こと 
が で きる と 思わ れ ま す 。 そ こ で 。 EROR 
語 を 使っ て , 同 -- の 日 的 の た なめ の プロ グラ 
ム を 作っ て み ま し た 。 目 的 は , 数 字 の SORT 
(整列 ) で す 。SORT に は いろ いろ の や り 方 が 
あり ます が , ここ で は 次 の よう な や り 方 を 

し て いま す 。 

am amti, “s ап, а が 大 きい 順に 並ん で 
いる とき, an-」 を , そ れ を 挿入 し て も 大 
小関 係 が 乱れ な い 位 置 に 挿入 し ます 。 た と 
えば , am-i% ai аъ 2а: +: 51%, am- ҒАНА 
し た 結果 は , 

аһ, Ат--і , 777, di, Am—is itis 777» ап 

と な り ま す 。 こ れ を 新た に , 


ат—:1, ат, ^, ал-і, ап 


この と き 。, 


特集 クリ ー ン コン ピュ ー タ と 言 語 


と みな し て , as-。 を 挿入 し ます 。 こ れ を , 
挿入 する 要素 が な く な る まで 繰り 返し ます 。 
この 方 法 で S0RT を 行なう プロ グラ ム が 
リス ト 8 一 リス ト 15 に 示し て あり ます 。 SO 
RT すべ き 要 素 は , 乱数 を 使っ た も の (GA 


リス ト 8 GAME に よる ソー ト 


K=P+ 1 

B=(X<L :K)*(K<=N) 
;=B=0 %-3060 

L :K-1)=L :K) 


リス ト 9 PALL に よる ソー ト 


ARRAY 11201; 
UAR LN; 
PROCEDURE INST(X,S,E); 
BEGIN 
IF (S>E) 
THEN 
LLS-1 ]eX% 
ELSE 
IF (X<L[S]) 
THEN 
BEGIN 
LES-1]eLES] 
INST(X,S+1,E); 
END 
ELSE 
.І5-11еХ; 
END; 
PROCEDURE SORTS, 1,E); 
BEGIN 
IF (5<12 THEN 
BEGIN 
INSTCLEI-13.I,E2; 
SORTCS, 1-1; E); 
END; 
END; 
PROCEDURE PRINL(S,E) 3 
VAR I; 
BEGIN 
1<5; 
EeE+1 3 
REPERT 
МЕІТЕСІ Г11%48,%203; 
UNTIL INCCIO-E; 
END; 
BEGIN 
Neg; 
LE03J€3;LL 1]*1;LE2J7€45LL 31*1 34114165; 
L[51*€9;LL61*2;LL23*5;L[L8J€55;L L93*3; 
PRINLCO,N) ; 
SORT(O,N,N) ; 
WRITECS9D) ; 
PRINLCO,N) ; 
END. 


特集 MZ は コト バ の 天才 で ある 55 


ME,FORM, PASCAL), № Т U sx EU 775 
Ф (PALL, FORTH), 示し て な いも の (LI 
SP) と , バラ バラ に な っ て いて 統一 性 が あ 


り ま せん 。 しかし, LISP 以外 の 言語 で は , 


サブ ルー チン だ け を 示す の で は , メイ ン ル 
ni と の か か わり が 不明 に な っ て し まい ま 
。 実行 きせ た と き に 何 か 結果 が 出る 


リス ト 10 FORM に よる ソー ト 


DIMENSION し (29) 
N=15 
DO 10 I=1,N 
L(I)=RND(9)+1 
CONTINUE 
CRLL 3000 
CALL 1900 
MRITE(Z) 
CALL 3888 
STOP 
: 1000 DO 20 I=1,(N-1) 
ID=N-I 
IX-LCID) 
CALL 2008 
CONTINUE 
RETURN 
K=ID+1 
IFCLCK2-IX) 200,200, 
IF(K-N) ,,200 
L(K-1)=L(K) 
K=K+] 
5070 100 
L(K-1)=IX 
RETURN 
DO 38 М-1,М 
WRITECLC(M). 12) 
CONT I NUE 
RETURN 
END 


шцшочгольом-о 
ә 


リス ト 11 PASCAL に よる ソー ト 


ARRAY L[20]; 
VAR LN; 
PROC INST СХ,5,Е); 
BEGIN 
IF (5<-Е) 
THEN 
IF (X>=L[SJ)) 
THEN 
LES-1] :=X 
ELSE 
BEGIN 
LELS-11:-LCS23; 
INST СХ,5+1,Е); 
END 
ELSE 


$50, 


と いう こと を 考え て 作っ だ た だめ 。 ú x KQ 
よう に な っ て し まい まし た だ た 。 LISP で ッ ー 
ト を 行なう に は , ソー ト さ れる 数 の 列 を S 


ORT と いう 関数 の 引数 と し ます 。 


* 


リス ト を 比べ て みれ ば , それ ぞ れ の 言語 


の プロ グラ ム の 構成 が よく わか る の で は な 
いで しょ うか が 。 


お わり に 


АМОН ЕС, MZ で は いろ いろ な 言語 が 


使え を 4 る こと が わか っ て も ら え た と 思い ます 。 


まだ この ほか に 1 も 。 SI アモ セン グラ 。 GAL, 
DRAW, FAST, CAP-X な ど 興 味 深 い 言 
287! £ ( 残っ て いあ の で す が , ペー ジ の 都 


リス ト 12 TL/1 に よる ソー ト 


PROC INST,SORT,PRINL 


1010 UAR I,N 

1022 ARRAY L[29] 

1030 BEGIN 

1040 М:-14 

1050 FOR І:-0 ТОМ DO 
1060 LEIJ:-RNDC9) 

1020  PRINLCO,N) 

1080  SORTCO,N,N) 

1090  WRITECO:CRLF) 

1100  PRINLCO,N) 

1110 END 

1120 INST(X,S,E) 

1130 BEGIN 

1140 IFCS>E) 

1150 ТНЕМ 

1168 L[S-1l:=x 

11209 ELSE 

1180 IF(X<L[S]) 

1190 THEN 

1200 [ LES-1]:=LES〕 
1219 INSTCX,S+1,E) 1 
1229 ELSE 

1230 L[S-11:= 

1240 END 

12502 SORT(S,I,E) 

1260 BEGIN 

12280 IF (5<1) THEN 

1280 t INSTCLEI-!3, D; E) 
1290 SORT(S,I-1,F) 1 
1300 END 

1318 PRINL(S,E) 

1320 UVAR I 

1330 BEGIN 

1340 FOR 1:-5 TO E DO 
1350 WRITE(@:L[I),SPACE(1)) 


LES-11:-X; END 
END; 
PROC SORT (S, I,E2; 
BEGIN | - ソー 

COE TEN リス ト 13 LISP に よる ソー ト 

BEGIN (I/O 版 ) >(DEF INE INST (LAMBDA (X L) (COND (CNULL 
INST CLCI-13, D; E2; L) (CONS X L))(CGRERTERP X (CAR L2) (CO 
SORT С5,1-1,Е); NS X L2) (T (CONS (CAR L) (INST X (COR L 
END; 2:002) 

Mr ] У(ОЕЕ1МЕ SORT (LAMBDA (L) (COND ((NULL f 
ROC PRINL С5,Е); COR LJ) L)(T (INST (CAR L) (SORT (CDR L) 
VAR 15 133999 
BEGIN 

FOR !:-S TO E DO (新版 ) 「DE SORT (L) 
WRITE (16119; (COND 
END; CCNULL CCDR L)) L) 

BEGIN (T CINST CCRR L) (SORT CCDR L)))) 
N:-214; 12 
FOR I:=@ TO N DO (DE INST (X L) 

LEI3:-RNDC9) ; (COND 
PRINL (0,N); (CNULL L) (CONS X L2) 
SORT (@,N,N); (CGREATERP X CCAR L2) (CONS X L2) 
WRITE С); (T CCONS CCAR L) 
PRINL (9,N): CINST X CCOR 123 2) 
END. | 12 


56 


Oh! MZ 1984.5. 


E 
ШІ 
合 で 割愛 させ て いた だ きま し た 。 な お 。 こ 
の 記事 を 書く た め の 資 料 を 集め て みて , Z 
の 慕 大 な 量 に 気づい だ とき, どう す 物 ば よ 
いか 困惑 し て し まい まし た が ,。 な ん と か 今 
回 の 有形 に まとめ る こと が で きま し た 。 もし, 
どれ か の 言語 に 少し で も 興味 を 持っ た ら , 

その 原典 (参考 文献 に 入れ て ある ) に あたっ 
て みる こと を お 勧め ゆ し ます 。 それ ぞ れ の 言 
語 の も っ て いる 魅力 を , その 製作 者 より も 十 
分 に 伝え る こと は 不可 能 と 思わ れ ま すか ら 。 


リス ト 14 FORTH/> に よる ソー ト 
(エディ タ に よる プロ グラ ム ) 


20 ARRAY L 
: WOUER OUER OUER j 
: WROT ROT ROT ; 
2 INST 
WOUER <= IF 
WROT MOUER L A@ >= IF 
1 - L А5 DROP 
ELSE 
DUP L ñ@ OUER 1 - L ñ? 
1 + ROT INST 
THEN 


ELSE DROP | = L Af THEN 


: SORT 
ЫКОТ WOUER < IF 
1 - ROT OUER MOUER L Re 
ROT 1 + ROT 


INST 

SORT 
ELSE 

DROP DROP DROP 
THEN 


: PRINL 


DO I L ñ@ SPACE . LOOP 


19 9 PRINL 
8 3 3 SORT 
CR 

10 @ PRINL 


リス ト 15 M-FORTH に よる ソー ト 
(エディ タ に よる プ ブログ ラム ) 


FORGET L 
$8000 CONST L 
AE e В J 
88 + eB 1 
SPACE ' S; 1 
I1 DROP 1-1 A! 1 
12 OUER L A@ 30UER 1 
13 OUER L A@ 20UER 1 - L ñ? SWAP 1 + S 
ҸАР 1 
C INST DDUP > IF I! ELSE I2 > IF ІЗ INST 
ELSE I! THEN THEN 1 
[ S1 OVER DUP 1 - L A@ SWAP 20UER INST S 
WAP 1 - SWAP 1 
t S2 DROP DROP DROP 1 
t SORT ОЧЕР 30UER > IF 51 SORT ELSE S2 T 
MEN 2 
[ PRINL DO I 
3 9 L9 1-1 
54. 6% 9 5 | 
5.81 093.9 
БЕ 
10 9 PRINL 
LF 
0 9 3 SORT 
LF 
1@ @ PRINL 


SPA 
42 
26 


LO 
1 
6 


MZ-2200/ 200 


ンタ プリ タバ スカ ル の 拡張 


Megumu Kudou 


じ め に 
カル は , 教育 的 で か つ わ か りや すい プロ グラ ム を 書け る と 
いう 特徴 を も っ て いま す が , シャ ー プ か ら 供 給 さ れ て いる イン タ 
プリ タパス カル MZ-1Z004 は テー プ 版 で , ディ スク に 対す る コマ 
ンド を 含ん で いま せん 。 

そこ で , パス カル の コン トロ ー ル コマ ンド を 追加 し て , ディ ス 
ク に *—7, アベ ンド な どの コマ ンド を 実行 で きる よう に 
し た 。 


プロ グラ ム の 入力 方 法 


ンプ ルリ スト も し く は ダン プリ スト に 従い 。 正しく ブログ 
ラム を 入力 し て くだ きい 。 ま た, ワー クエ リア は すべ て 00m に し 
て お きま す 。 プ ログ ラム を 入力 し 終わ っ た ら , 実行 の 前 に 一 旦 , 
SAVE し て お きま し ょ う 。 
人 コマ ンド で 。 
S-adr. $ 62FB 
E-adr. $ 745B 
J-adr. 8 00В1 
で テー プ に SAVE し て くだ さい 。 
次 に モニ タ の J コマ ンド で 
J-adr. $ 71F5 
で 実行 きせ て , 正常 に 動く か どう か を 確認 し て くだ きい 。 正 常に 
動作 し た ら , 3 項 の ディ スク 版 の 作成 に 移り ます 。 
ここ で くれ で れ も 注 意 し な けれ ば な ら な い の は , テー プ に SAV 
E す る 前 に J-71F5n を 実行 する と , 71F5n 以 降 の メモ リ は パス カル 
の プロ グラ ム エ リ ア と し て 使用 る きれ, 入力 し た プロ グラ ム が 保存 
en o 必ず J-adr. $00B1 で テー グ に SAVE し て お きま し ょ 


B 


2 


プロ グラ ム の 説明 


スカ ル は , プロ グラ ム エ リ ア と し て , 62FBa 以 降 を 使用 し て 
CARD, イン タプ リタ を 変更 し て 、 プ ログ ラム エリ ア を 71F5a 
以降 し し まし た 。 ま た, コン トロ ー ル コマ ンド は , V.1.0A で は 
434Fa で 各 コ マン ド へ 分 岐 し て いる の で , ディ スク に 対す る コマ ン 
ド 追 加 を そこ で 変更 し て いま す 。 以上 の 処理 は 71F5a ョ 一 7249』 で 行 
な っ て いま す 。 


工藤 Ж 


62ЕВн--6470н12, ディ スク に 対す る READ お よび WRITE の た 
め の サ プ ブルー チン で す 。 これ は , MZ-2000 の IPL リ スト お よび 1I/ 
O に 掲載 され た 飛 岡 氏 の プロ グラ ム を 参考 に る きせ て いた だ きま し 
だ 。 

6CBOm 一 71F48 は メイ ンコ マン ド で , 希望 と する コン トロ ー ル 
コマ ンド を 実現 し て いま す 。 

724An 一 745Aa は CRT の 下 4 行 に ファ ンク ショ ン キ ー を 表示 す 
る た め の プ ログ ラム で , スク ロー ル エ リア は 0 一 20 カ ラム で す 。 
前 述 の よう に , ここ は 1 度 実行 きれ る と , パス カル の プロ グラ ム 
エリ ア と し て 使用 る れ ま す 。 

ディ スク で の ディ レク トリ エリ ア は , トラ ッ ク 01m セ クタ 01a か 
ら ト ラッ ク 01m セ クタ 08m ま で で , FAT エリ ア は トラ ッ ク 00』 セ ク 
タ 02』 か ら ト ラッ ク 00m モ クタ 05n ま で を 使用 し て いま す 。 こ れ は フ 
ァイル の 管理 を し や すく する た めで , したがって, シャ ー プ の D 
ISK BASIC な どの ディ スク と の 互換 性 は まっ だ た だく あり ませ ん 。 
し か し , 使用 する ディ スク は , DISK BASIC の Utility L ETA 
ニシ ャ ライ ズ し た も の を 使用 し て くだ さい 。 

また , 処理 速度 向上 の た め ゆめ に ディ レク トリ エリ ア を 1 度 に ワー 
クエ リア に 読み 込む こと に し た ため, ワー クエ リア が 大 きく な り 
まし た が , た と えば ワー クエ リア を 256 バ イト に する こし とも, もち 
5^slllC す 。 し か し を その 場合 , ディレク トリ の 読み 方 と FAT の 
記 変更 が 必要 に な り ま す 。 
ディ スク 版 の 作成 2 3 " CIS e M i 
С, パス カル に お いて も ディ スク に 対す る アク セス が 可能 
に な る わけ で す が ,。 ここ で , DISK BASIC の よう に , IPL か ら 
直接 BOOT す る 方 法 を 示し ます 。 

1. 本 プロ グラ ム を J-adr. $00B1 と し て テー グ に SAVE し て お き 
ます 。 

2. DISK BASIC を 起動 し ます 。 

3. Utility を RUN る させ, リセット ボタ ン を 押し て モニ タ に 戻り ま 

T. 

4. 何ら か の ユー ティ リティ ブログ ラム で , 4000u—EFFFu*00u 

に し て お きま す 。 

5. モニ タ の 02B9n, 02ВАн, 02ВВн%21н, 00H, 70』 に 変更 し ま 

す 。 

6. モニ タ の L し コマ ンド で シャ ー グ の イン タプ "リタ パス カル MZ- 
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1Z004 を テー プ か ら ロ ー ド し ます 。 
7. モニ タ の 02BAa, 02ВВн№ ЕВн, D2n に 変更 し ます (モニ タ 
の ロー ドコ マン ド の パッ チ )。 
8. 1. で 作成 し た テー プ を , 同じ く モ ニタ の L コマ ンド で ロー ド 
し ます 。 これ は 自動 的 に D2FBr 以 降 に ロー ドミ きれ ます 。 
9. 705 Юн, 70АЕн, 70В0н%58ң, F5u, 71n に 変更 し ます 。 
10. 4000』 以 降 に , 01н, 49н, 50н, 4Сн, 50н, 52H, 4Ен, 4Dr, 
5Ан, 2 Он, 31H, 5Ан, 30н, 30H, 34H, 0Dn と 書き 込み ます 。 
11. 4014н, 4015ні:5Ан, 74u RES JA d. 
12. 401Ен, 401Ені230н, 00m と 書き 込み ます 。 
13. 4100 ョ ー417Fa に 01m を 書き 込み ます 。 
14. 5000m に 80』 を 書き 込み ます 。. 
15. 145Ен, 145Ен, 1460н, 1482н, 1483н, 1484н, 14АЗн, 14A 
4н, 14A5g を 00g に 変更 し ます 。 
16. 144Ен, 1450н%5Ан, A4n と し ます 。 
17. ドラ イブ 2 に イニ シャ ライ ズ 済 み の デ ィ ス ク を 入れ ます 。 
18. J-adr. $12A0 を 実行 し て Utility CKD, Сати КС, From 
1 to 2 で マス ター ディ スク を 作成 で きま す 。 
めん どう な よう で す が , 基本 的 に は 40008 二 5000』 ま で は マス タ 
ー の 情報 , 7000m 一 E45AaH を ディ スク の 03』 ト ラッ ク 01m セ クタ か ら 
書き 込め ば , マス ター が 作成 可能 な わけ で す 。 したがって, これ 
を 応用 し て ゲー ム や 他 の シス テム ソフ ト な ど を 直接 ディ スク か ら 
IPL で 起動 でき ます 。 た だ し , これ は プロ グラ ム エ リ ア が 最大 7F 
FFa バ イト まで の プロ グラ ム で , それ 以上 の 大 き な プ ログ ラム , 
た と えば テー プ 版 の LOGO な ど で は , まず ロー ダー を 起動 させ, 
続い て 本 体 を ロー ド す る と いっ た 手順 を ふむ 必要 が あり ます 。 
まだ , ここ で 作成 し た ディ スク は シャ ー プ で いう 。 サ プ ・ マ ス 
ター ディ スク で す が , 大 部 分 の 方 が ご 承知 の よう に , Utility O14 
6590208 І8н Ж 5 Б, サブ プ ・ マ スタ ー デ ィ ス ク の コピ ー が 
可 


使用 方 法 


スカ ル の 起動 後 、Q プ コマ ンド で モニ タ に 戻り , 上 コマ ンド 
で 実行 きせ ます 。 
この プ ブログ ラム に より 追加 る れ た コン トロ ー ル コマ ンド は , 
Files (BASIC の DIR), Append, Save, Delete, Lock, 
Unlock, Rename 
で す 。 す べ で て の コマ ンド は , 前 述 の コマ ンド の 頭 娘 字 オ ノ (スラ 
ッシュ ) の 形 で 使用 し ます 。 す な わ ち ,F グ と か A グ の よう に 使 
っ て くだ さい 。 以下, 各 コ マン ド を 詳解 し ます 。 
*Files (ディ スク の ディ レフ トリ の 表示 ) 
EA: FZ (ドラ イブ ナン バー) 


リス ト 


X*X* Oh!MZ Check sum System V1.1 xx 
ADR. +0 +1 +2 +3 +4 +5 +6 +7 isum. 
62FB ЗА 7A 64 B7 28 04 O6 O2 :2.03 


6303 18 02 O& OA ЗА 78 64 Fé 12.36 
630B 84 32 7А 64 05 DC 21 19 :3.7D 
8515 3C 2B 7C BS 20 FB 10 Fé :3.B9 | 


58 омм 1984.5. 


解説 : 入力 は ドン, F/ 1 お よび F ノ 2 のみ が 許さ れ ま す 。 
ドン は 現在 の デフ ォ ル トド ライ ブ の ディ レク トリ を 表 
示し ます 。 ま だ た 。 デ フォ ルト ドラ イプ を 変更 し て ファ 
イル の ディ レク トリ を 表示 る せ た い 場合 は Е/20 
よう に 入力 する と ドラ イブ 2 に 入っ て いる ディ スク の 
ディ レク トリ を 表示 し , デフ ォ ル トド ライ ブ は ドラ イ 
グ 2 た な り ま ず 
жАррепа 
ЖАСА/ (ドラ イプ ナン バー) (ファ イル ネー ム ) 
解説 : 使用 方 法 は 以下 の 3385 です 。 
① デ フォ ルト ドラ イブ を 変更 し な い 場 合 。 
だ と ぇ えば A ン と 入力 する と , Filename? と 表示 され ま 
+. 以下 ファ イル ネー ム を 入力 する と, その ファ イル 
な アペンド し ます 。 
② デ フォ ルト ドラ イブ を 変更 する 場合 。 
現在 デフ ォ ル トド ライ プ が ドラ イブ 1 で , ドラ イブ 2 
か ら フ ァイル を アペンド し た い 場 合 , A2 と 入力 す 
5L, Filename? と 表示 る され ま す 。 1 と 同様 に ファ イ 
ルネ ー ム を 入力 する と , ドラ イブ 2 か ら 指 定 さ きれ た フ 
ァイル を アペンド し , か つ デ フォ ルト ドラ イブ は ドラ 
イプ 2 に 変更 きれ ます 。 
③ 省 略 形 
記 1, 213, A プ ファ イル ネー ム 。A グ 1 ファ イル ネ 
ー ム , A グ 2 ファ イル ネー ム の よう な 省略 形 が 許さ きれ 
ы), ディ レク トリ 表示 後 す で に アペンド する 際 に 
は 便利 で す 。 
* Save, Delete, Lock, Unlock 
書式 : Append と 同様 
解説 Append と 同様 
* Rename 
書式 : R プ (ドラ イプ ナン バー) (IH フ ァイル ネー ム ,。 新 ファ 
イル ネー ム ) 
解説 : ほぼ Append と 同様 で びす が 。 必ず , (2379) を は さん 
で 2 つの ファ イル ネー ム を 入力 し て くだ さい 。 コ ンマ 
が な か っ たり, ファ イル ネー ム が 1 つの 場合 は 実行 
れ ま せん 。 


わり に 19 


応 目 に つく 限り の バグ は 除い た つも り で す が 。 不 十分 な 点 も 
ある か と 思い ます 。 読者 の 方 の ご 意見 を お 待ち し て いま す 。 
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5С 


ср 


Е7 


4t 


12 


“ЕВ 22 de 
ЗЕ 142 


20 DC ` 


ва 32 


CD 47. 
ав CD. 
со CD. 


— 


Sc 24 
CDS 
23 Ор 
70:23: 
2D óB 
ЕВ 18 
11 04 
CD 66. 


1:4. BE 
:5.65 
14.6D 
:5.5р 
t2.DF 
:4.5Е 
14.25 
ー1F4O 
213.42 
32.31 
:1.7Ғ 
13.72 
12.46 
13.52 
:2.7Е 
:5.09 


------------------------- -----1685 


65FB 
6603 
660B 
6613 


SB 
Sa 


cc 
04 
с? 


74 
CD 


ср 72 
12 C8 


:4.6D 
13.16 


ЗЕ 


55 


43 
Sc 


2A 
FO 
sc 
44 


32 


182 


44 
45 


27 
SD 
4% 
46 


B8 


44 
45 


45 
48 


54 
АЕ 
FO 


FO 
Fo 
04 


4С 
50 49 
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46 
40 


53 
FO 


вс 
05 


5С 
SE 
49 
49 
FO 
5С 


322.80 
8 SEE 
pt2.FF 
25.58 
:3.B7 
14.16 


ーーーーーーーーーーーーー1C1D 


: 3. 5B 
1205 
: 2. BD 
:3.97 


60  onwz 19845. 


89ЕВ 52 F2 ED B2 49 4E 49 F2 :4.Б5 
69F3 ED А2 49 ДЕ 44 52 F2 ED :4.9B 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー1FF 晶 
69FB ВА 49 ДЕ 44 F2 ED AA АҒ :4.6D 
&A03 55 54 49 F2 ED АЗ АҒ 54 :4.17 
АОВ 49 52 F2 ED ВЗ АҒ 55 54 :4.25 
6A13 44 F2 ED АВ АҒ 54 44 52 :4.07 
6A1B F2 ED BB 4С 44 20 41 2C :5.В7 
вА25 28 48 4С 29 F1 7E 4C 44 :2.Е4 
6A2B 20 42 2С 28 AB AC 29 F1 :2.64 
6433 46 AC 44 20 43 2C 28 48 :1.D5 
------------------- -----------1В84 
&A3B AC 29 F1 ДЕ AC 44 20 44 :2.68 
6845 2C 28 48 4С 29 Fl 56 4С :2.А4 
éA4B 44 20 45 2C 28 48 4C 29 :1.БА 
6653 F1 SE 4C 44 20 48 2C 28 :2.9B 
6a5B 48 AC 29 F1 66 AC 44 20 :2.С4 
6865 АС 2C 28 48 4C 29 F1 ФЕ :2.BC 
AGB AC 44 20 28 48 AC 29 2C :1.C1 
6873 41 Fl 77 AC 44 20 28 48 :2.C9 
-------------------------- ーーーー1 さ AB 
5A7B 4C 29 2С 42 Fi 70 4C 44 :2.04 
6AB3 20 28 48 AC 29 2C A3 Fi :2.65 
6ABB 71 4C 44 20 28 4B АС 29 :2.06 
5493 2C 44 F1 72 4C 44 20 28 :2.AB 
6A9B 48 4C 29 2C 45 Fi 73 AC :2.DE 


6B3B 29 F2 CB OE 52 52 20 :3.04 
Ваз 48 4C 29 F2 CB 1E 53 :5.15 
6B4B 41 20 28 48 4C 29 F2 :2.84 


8 
8% 
š 
883 
? 
8 
g 
à 


Co CO C1 CO ОВ BO :4.89 
телеси еее pee tM EEAS 
со CO OB CO :3.20 
св оо CO :2.A0 
CO BO BB :4.1А 
00 АЗ :2.АС 
во 10 ВВ s2.CB 
80 20 00 :2.А2 
90 OO BO :2.ҒО 
00 OO 1C :1.6C 


6B83 ов 80 


o 
Š 
888888 
88 
888858888 
98 
88858888 
> 
о 


いい 
Š 
a 
8828285 

^ 
Q 
о 
- 
Ë 
° 
N 
+ 
u 
о 
А 
ё 
.. 
- 
. 

- 
> 


6BF さ 44 20 
------------------------------ОСЕ9 


СОЗ 20 23 2C 28 49 59 24 29 :1.86 
ФСОВ F3 FD 46 OO ОЗ 4C 44 20 :2.E9 
6Ci3 28 49 58 24 29 2C 23 F3 :2.58 
6C1B DD 70 00 04 4C 44 20 28 :2.29 


2А 12.60 


6C2 さ 49 59 24 29 2С 23 F3 FD :3.2bE 6ESB O3 20 1D ЗА 92 5С FE 

&C2B 70 00 04 4C 44 20 2B 48 :1.94 6E6 さ 20 09 11 BE 70 CD BS 06 :2.ҒО 
&C33 АС 29 2C 24 F2 36 ОО OF :1.FC 6E6B C3 D8 6C ЗЕ OO 22 80 5С :3.63 
meu Cae cs ы аа E НЕЙ 1280 6Е75 CD OO éD CD ВА р 18 14 :5.5А 
&C3B 4C 44 20 28 49 58 24 29 :1.С& Mime ume وو‎ 
6C4 さ 2C 24 F4 DD 36 ОО OO OS :2.5C 6E7B ЗА Аі 6С FE O6 28 40 FE :3.B1 
6CAB АС 44 20 28.49 59 24 29 :1.C7 6EB さ 04 28 71 11 DD 70 CD BS :3.7D 
6C5 さ 2С 24 F4 FD 36 00 00 OS :2.7С 6EBB O6 C3 DB 6C 11 20 71 CD :3.7C 
5С5В 4C 44 20 41 2C 28 24 29::1.92 6E93 BS 06 11 OC 11 CD BS 06 :2.71 
&C63 ЕЗ ЗА ОО OO 06 АС 44 20 :1.ЕЗ 6E9B 2А 94 С 22 АС 6C CD 58 :3.89 
6C6B 23 2С 24 F2 Оё 00 02 4C :1.В9 ФЕАЗ éF 2А 9C C 22 Аё С CD :3.42 
6С72 44 20 28 24 29 2С 41 ҒЗ :2.39 ФЕАВ 2E F 2А Аё С ЗА AS С :3.24 
Kp Май атала ла A DI USUS TESI eR T OFCC 6EB さ 06 OO 70 23 3D FE ОО 20 :1.Ғ4 
6C7B 32 OO 00 07 4C 44 20 48 =1. さ 1 | 7 ------------------------------ 195E 
&6C83 4С 2C 28 24 29 ҒЗ 2A ОО :2.0а `ФЕВВ F7 CD ВА éD C3 D8 C 34 :5.2C 
6CBB OO ОА 4C 44 20 42 43 2С :1.6B ФЕСЗ 92 С FE 2А 28 9C 21 OC :5.17 
8С93 28 24 29 F4 ED 4B ОО 00 :2.A1 ФЕСВ 11 7E FE OD 28 ОЗ 23 18 :2.00 
6C9B OB -4C 44 20 44 45 2C 28 :1.98 6ED3 ЕВ 23 11 81 6C O1 11 OO :2.2B 
&CA3 24 29 F4 ED SB 00 00 OB :2.94 6EDB ED.BO ЗЕ OD 32 91 6С 11 :3.28 
6CQB 4C 44 20 53 50 CD р éD :2.FA 6EE さ 2B 71 CD BS 06 11 B1 6C :3.22 
СВЗ CD E2 С CD Bi éD ЗЕ O1 {4.45 ФЕЕВ CD BS Oá CD OO ёр CD ВА :4.49 
------------------------------ 12B2 6EF さ 6D C3 DB éC 11 OC 71 CD :3.CF 
&CBB 32 AO 6C 21 80 64 22 A2 15.07 | 7 ———-— 1ADO 
6ССЗ с CD 27 OS 28 ОҒ CD F4 :3.5D 6EFB BS O6 11 81 6C CD BS O6 :3.41 
&CCB 6C CD OD ар CD SB óD FE :4.46 6FO さ 2А 94 С 22 74 54 “ЗА 9E :2.FC 
6CD さ 41 28 02 18 EC ЗЕ 00 32 :1.DF 6FOB С 32 76 64 ЗА Е ФС 32 :2.EF 
&CDB 74 64 D3 DC C3 O1 13 21 :3.85 6F13 77 64 2A F7 82 22 72 64 13.56 
&CES 00 ОВ 22 74 64 21 80 64 :2.07 6F1B ED 4B 94 éC 09 01 01 00 :2.43 
СЕВ 22 72 64 ЗЕ O1 32 79 64 :2.46 6F23 ED 42 22 F7 62 CD Ві р :4.95 
&CF3 С? 2А А2 С 11 BO ӘС O1 :2.FF 6F2B C3 DB С 21 ВО 64 22 72 : 3.60 
------------------------------ 175a 6F33 64 21 00 04 22 74 84 ЗЕ :1.C1 
СЕВ 20 ОО ED BO С? 21 BO «С * さ 。9 さ ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー18BB 
る DO さ ED SB А2 С 01 20 00 ED :3.64 &F3B OO 32 76 64 ЗЕ 02 52 77 :1.ҒЗ 
éDOB BO С? ЗА BO «С FE BO 28 :4.45 6Ғ4З 64 CD Ві 6D C9 2A F7 62 :4.9В ` 
&D13 16 FE AO CO 11 ñD 70 CD :4.6F &FAB O1 FS 71 ED 42 01 01 OO 2.98 
рів B5 06 CD 43 éD 11 Ві 6C :5.56 6F5 く 09 22 AC С С? 2А АС éC :3.4E 
025 CD BS 06 CD 64 07 C9 CD :4.56 &F5B ЗЕ 01 01 00 O1 ED 42 38 :1.4^8 
6D2B 64 07 34 B1 6C FE OO 20 :2.BO る 6F6 さ ОЗ ЗС 18 Fé 32 А5 6C С? :5.59 
6D33 ОА 11 AO 70 CD BS Оё CD :5.80 j ФҒӘВ 11 16 71 CD BS Оё 11 OC :2.3D 
woe ت‎ Uc UM AMETE s 6F73 11 CD BS O6 CD 2E éF CD :3.DO 
&D3B 64 07 C9 11 A7 70 18 ҒА :3.68 Sal fig шы ааа: 5 1784 
6045 SA 92 С FE ОО 20 ОА CD :5.2р 6F7B 48 6F CD 58 6F 21 7E 68 :3.52 ` 
арав за O6 CD ЗА оё CD ЗА O6 :2.5А 6FBS 22 AA &С 21 AO 64 22 АВ :3.27 0 
6055 C? ЗЕ 2А CD 3C 06 18 F2 :3.4A 6FBB 6C ЗЕ OO 32 44 С CD 7F :3.38 ` 
&DSB 2А А2 «С 11 20 00 19 22 :1.А4 6F9 さ 70 22 АВ 6C 7E FE 01 20 :5.45 
6065 А? óC за AO С ЗС 32 АО :3.62 6Е9В ОВ 23 ЗЕ OO 32 44 «С 18 :1.С3 
&D&B 6C C9 ЗЕ 01 32 76 84 32 :2.B2 &FAS ED за 44 С 3C 32 A4 &C :5.В5 
075 77 64 C9 11 Bi 70 CD BS :4.58 оғав за AS С 47 ЗА A4 6C BB :5.94 
[cre Oo NN D TRIN TOES алыс СТГ ТИШЕК РЕШЕ” А ЫТЫ... a SA 6FB3 28 O6 25 CD 7F 70 18 Dé :2.FB 
6D7B 06 ЗЕ 2F 52 ЕЗ OB 11 OO :1.44 BUTTON ERREUR SEI Epson -—— FB 
6D83 11 CD ES OB 11 OC 11 14 :2.16 &FBB За А5 &C АҒ OD Оё ОО ED :2.9а. 
6DBB FE 2C 28 07 FE OD 28 OD :2.99 «ЕСЗ 42 22 A6 6C 2А Aé 6C 01 :2.B3 
&D93 13 18 F4 ЗЕ OD 12 13 1A :1.49 &FCB 80 04 ED 42 7C CB 27 CB :3.EC 
6D9B FE OD CA DF óC ЗА OO 11 :3.6B &FD3 27 СВ 27 СВ 27 47 7D Dé :5.45 
éDAS FE ОВ СА DF éC ЗА OC 11 :5.75 6FDB 10 50 FC Сё 11 32 АҒ éC :5.40 
6DQB FE OD СА DF ёс С? ЗЕ OO :4.27 &FES 7D CB ЗЕ CB ЗЕ CB ЗЕ CB :4.66 
6DB3 32 71 64 CD FB 62 C9 ЗЕ 4.38 &FEB ЗЕ 80 22 AE &C 2а Aé óC :3.47 
кла Sama кале HE AB ДЕР GI ынны 173B 6FF さ ЗА А5 6C O6 01 70 23 3D :2.22 
&DBB 01 32 71 64 CD FB 62 За :3.6C AE ーー1AOD 
6DC さ 7F 64 07 07 DO CD 64 07 :2.Ғ? 6FFB ЕЕ ОО 20 F7 CD ВА 6D CD :4.0 
SDCB 11 57 71 CD BS O6 C3 ра :3.DC 7003 6D éD CD E2 С CD ВІ éD :4.Е0 
6DD さ с CD 76 р CD 5р éD CD :4.90 700В ЗЕ 01 32 AO &C 21 80 64 :2.82 
6DDB 87 éD ЗА А1 «С FE 05 20 :3.5E 7013 22 A2 С CD F4 C ЗА 80 :4.17 
6DE さ 10 2А F7 62 01 O1 OO ED :2.82 701В éC FE OO 28 O9 CD 5B &D 3.30 
6DEB 42 O1 FS 71 ED 42 DA DF :4.91 7023 FE 41 20 EF 18 6E ЗЕ AO :3.B2 
6DF さ С CD E2 6C CD Ві éD ЗЕ :4.BO 702В 52 BO óC ЗА AE С 32 9E :5.42 
ноли S URS DERE EUN SES ーーー1DF2 7033 6C 3A АҒ 32 9F &C 3E :3.3C 
6DFB 01 32 AO 6С 21 BO 64 22 :2.66 АЕРА ی‎ RR 
6EOS А2 6C CD 27 05 СА D8 6C :4.15 7035 OD 52 ІС 11 21 OC 11 11 :0.ВВ 
6EOB CD F4 éC ЗА BO «С FE OO :4.51 7043 Bi 5С O1 11 OO ED BO ЗЕ :2.DA 
6E13 28 OD 11 OC 11 21 81 5С :1.71 704B OO 32 92 С 2А АС С 22 :2.94 
6E1B 06 OF CD C8 OS 28 18 CD :2.BC 7055 94. 6C ZA Аб 6C 22 9C 6C :3.66 
ФЕ25 SB óD FE 41 20 DC За Ai :5.ПЕ 7О5В CD OO éD CD ва р 21 FS :4.44 
6E2B С FE 05 CA 6B 6F 11 CE :3.F2 7065 71 22 72 64 2А AC 6C 22 :2.CD 
6ESS 70 CD BS O6 C3 DB 6C ЗА :4.59 7О&В 74 64 ЗА AE «С 32 76 64 :3.38 
РСТ DSTI EEEE EE 1BO2 7073 ЗА АҒ éC 52 77 64 CD BA :3.E9 
&AESB.AL 4E EE 0220 OA SE 2A. 12.99 U D [oos l T u ыы атана sisa f 
6E43 18 06 FE 01 20 OE ЗЕ OO :1.89 707В 6D C3 DB ёс ES 2А АА С :4.99 
6E4B 32 92 С CD 00 р CD BA :3.F1 à .7083 ED AB АВ &C ED 42 38 02 :5.В5 
6E5 さ éD C3 DB 6С ЗА Аі 6C FE :4.В9 708B Ei C9 Е1 11 EB 70 CD BS :5.79 
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709B BS 06 C3 DB 6C 4D 41 55 :3.A3 728B 12 97 9B 9B 31 9B 9B 9B :3.E1 
7083 54 45 52 OD 55 АС 41 56 :2.2Е 7293 9B 9B 9B 9B 32 9B 9B 9B :4.6F 
7OQB 45 OD 50 41 55 OD 46 59 :1.F2 729B 9B 9B 9B 9B 33 9B 9B 9B :4.70 
70B さ «С 65 20 E 61 éD 65 20 :2.B2 72083 9B 9B 9B 9B 34 9B 9B 9B :4.71 
Ma ЛЕ ЫРЫБЫ; рынан irm RM SAIS 1С90 4 72QB 9B 9B 9B 9B 35 9B 9B 9B :4.72 
7ОВВ 3F 20 OD 57 72 69 74 65 :2.77 72B3 9B 9B 9B 9B 36 9B 9B 9B :4.72 
70С3 20 70 72 F 74 65 63 74 :3.21 ・ーーーーーーーーーー ニ ーーーー ニ ーーーーー ニ ーー ニーー ニ ーー ニーー 2024 
7OCB 65 64 OD 46 69 6C 65 20 :2.76 72BB 9B 9B 9B 9B 37 9B 9B 9B :4.74 
7005 6E 6F 74 20 66 óF 75 6E :5.29 72C3 9B 9B 9B 9B 38 9B 9B 9B :4.75 
7ODB 64 OD 41 6C 72 65 61 64 :2.ВА 72CB 9B 9B 9B 9B 39 9B 9B 9B :4.76 
7OES 79 20 65 78 69 73 74 OD :2.D3 72D3 9B 9B 9B 9B 31 50 9B 9B :4.03 
7OEB ДЕ éF 20 66 49 АС éS 20 :2.9D 72DB 95 OD 9А 20 66 61 6С 73 :3.02 
7OF3 73 70 61 63 65 OD 4E 6F :2.D6 72Е2 5 20 20 20 74 72 75 65 :2.85 
IIQWECKACOUE TI NUT MR AU SESS ERI EE 1637 72ЕВ 20 20 20 64 éF 77 &E 74 :2.8C 
7OFB 20 64 69 72 65 65 74 6F :5.0А 72F3 6F 20 20 72 65 61 6C 3B :2.BE 
7103.24. 79:90-73-70. 61 &$ 68 13.17 т pupu EEA gar ТЫЛЫ 1СО5 
710B OD АС éF 61 64 69 6E 67 :2.CB 72ЕВ 20 20 20 62 68 61 72 3B :2.39 
7113 ЗА 20 OD 57 72 69 74 69 :2.76 7303 20 20 20 66 6С éF 61 74 :2.76 
711B 6E 67 За 20 OD 44 65 6С :2.51 730B 28 20 20 74 72 75 ФЕ ФВ :2.9C 
7123 658 74 59 ëE 67 ЗА 20 OD :2.7E 7313 28 20 20 20 75 ФЕ 74 69 :2.48 
712B S2 65 6E 61 6D 65 20 74 :2.EC 731B «С 20 20 20 74 68 65 ëE :2.7В 
7133 &F ЗА 20 OD 57 72 49 74 :2.7С 7323 20 20 20 20 65 6С 73 65 :2.29 
COO FR CANC TOROS OG RUTGERS こっ 1599 732B 20 9А Ор 9А 20 62 65 67 :2.АҒ 
713B 65 20 70 72 éF 74 45 63 :5.12 7333 69 ФЕ 20 70 72 ФЕ 52 45 :3.10 
Ji143 74 68 БЕ 20 548 69 73 6B 02-ы. 2 O 13F6 
714B OD CD 19 47 1B 1А FE S3 :2.CO 733B 64 75 72 65 20 56 75 6E 13.19 
7155 20 04 ЗЕ OS 18 59 FE 41 :2.17 7343 63 74 59 6F 6E 20 За 3D :2.B4 
715B 20 O4 ЗЕ 04 18 S1 FE 44 :2.11 734B 20 20 69 6E 74 65 67 65 :2.BC 
7163 20 04 ЗЕ ОЗ 18 49 FE 46 :2.ОА 7353 72 SB 20 62 6F 6F 6C 65 :2.DE 
716B 20 07 13 14 FE 2F 28 1B :1.C4 755В 61 6E ЗВ 20 61 72 72 61 :2.DO 
7173 E9 FE АС 20 04 ЗЕ 02 18 :2.АҒ 7363 79 SB 20 20 72 65 70 65 :2.СО 
ーー テー 157Ғ 736B 61 74 20 20 20 77 68 69 :2.7р 
717В 36 FE 55 20 O4 ЗЕ O1 18 :2.04 7373 «С 65 20 20 20 20 65 6E :2.24 
7183 2E FE 52 20 04 ЗЕ Оё 18 :1.ҒЕ ------------------------------1598 
71ВВ 26 15 E? 15 1А FE OD CA :3.24 737B 64 20 ?А OD 9В 9B 9B 9B :5.94 
7193 ВО «С FE 31 28 O6 FE 52 :3.A? 7383 9B 9B 9B 9B 9B 9B 9B 9B :4.D8 
719B 28 O6 1B E? ЗЕ OO 18 O2 :1.8A 738B 9B 9B 9B 9B 9B 9B 9B 9B :4.DB 
7143 ЗЕ 01 32 78 64 13 1A FE :2.78 7393 9B 9B 9B 9B 9B 9B 9B 9B :4.D8 
71АВ OD СА BO éC 1B 1B E9 32 :5.44 739B 9B 9B 9B 9B 9B 9B 9B 9B :4.D8 
7185 Ai «С 13 1А FE 2F 28 01 :2.90 7343 9B 9B 9B 9B 9B 9B 9B 9B :4.D8 
LU LX suia PROSPERO コー үү жолама 1445 75АВ 9B 9B 9B 9B 9B 9B 9B 9B :4.D8 
71ВВ Е9 13 1А FE OD СА D4 6D :4.2C 73B3 9B 9B 9B 9B 9B 9B 9B 9B :4.D8 
71С5 FE 31 28 23 FE 32 28 23 :2.F5 ------------------------------257С 
71СВ FE 20 20 ОВ 15 1А FE OD :2.81 73BB 9B 9B 9B 9B 9B 9B 9B 9B :4.D8 
7105 СА D4 6D FE 20 28 FS 21 :4.67 73C3 9B 9B,9B 9B 9B 9B 9B 9B :4.DB8 
71DB OC 11 1А 77 23 13 14 FE :1.FC 73CB 9B 9B 9B ? OD 62 65 67 :3.А?2 
71ЕЗ OD 20 F8 77 C3 D7 6D SE :3.E1 73D3 69 6E 20 OD 70 72 6F 63 :2.BB 
71ЕВ 00 18 02 ЗЕ 01 32 78 64 :1.67 73DB 65 64 75 72 65 20 OD áá :2.A8 
71Е5 18 DA 3E C3 32 4C 45 21 :2.DS 73E3 75 6E 63 74 69 óF ФЕ 20 :3.20 
Dive oio. Gn ыы EPIO RAE a D 1822 73EB OD ЗА Зр OD 69 6E 74 65 :2.41 
71ЕВ АС 71 22 4D 43 21 FS 71 :2.F6 73F3 67 65 72 ЗВ OD 62 óF óF :2.С6 
7205 22 Ға 12 22 57 13 22 74 12.50 | | ------------------------------ 14D9 
720B 15 22 Bé 15 22 CO 15 22 :2.1B 73FB 6C 65 61 6E 3B OD 61 72 :2.BB 
7213 FS 16 22 25 17 22 9D 18 :2.40 7403 72 61 79 SB OD 72 65 70 :2.ҒВ 
721B 22 ЗЕ 58 ЗЕ ОО 21 OO OO :1.17 740B 65 61 74 20 OD 77 68 69 :2.АҒ 
7223 32 AO 12 22 A1 12 32 FD :2.E8 7413 ӘС 65 20 OD 65 6E 64 OD :2.42 
722B 12 22 FE 12 32 2B 1А 22 :1.DD 741B 66 61 6C 73 65 OD 74 72 :2.FE 
7233 2C 1А 22 2E 1А 22 50 1А :1.1C 7423 75 65 OD 64 6F 77 ФЕ 74 :3.13 
— Ge 1099 742B 6F 20 OD 72 65 61 «С 3B :2.7В 
723B 22 32 1А 21 02 02 22 А9 :1.5E 7433 OD 63 68 61 72 3B OD 66 :2.59 
7243 18 21 20 20 22 CC 18 CD 12.4 | ү ----------------------------- 158C 
724B 58 09 21 ОО OO 11 OO 12 :0.а5 743B éC éF 61 74 28 OD 74 72 :2.CB 
7255 O1 BF OO ED BO ЗЕ 19 32 :2.B6 7443 75 6E 63 28 OD 75 6E 74 :2.D2 
725В ОС OO CD C3 06 06 15 ЗЕ :1.FB 744В 69 6C 20 OD 74 68 65 ëE :2.B1 
7263 01 CD ЗС 06 10 F? 11 BC :2.Вё 7455 20 Ор 65 ӘС 73 65 20 Ор :2.03 
726B 72 CD BS Оё 11 DD 72 CD :4.27 745B 00 : 0.00 
7273 BS 06 11 2E 73 CD B5 05 s2。F5 |. -------- SEREFA SRS SS кісен» -0A51 
------------------------------ 1202 0006A48A 
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for mini-flopPu disk operation Ver. 1.1 
руе 
, by M. Kudoh programmed: Nov. 15 783 
£ Expansion of PASCAL interpriter М2-12004 V1.0 update t Dec. 25 “ӨЗ 
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709 0000 $ 11 азав 14 
10 0000 Eum =, 12 636C 2А7264 
11 0000 $ 15 eSeF D? 
12 0000 4 14 6370 
13 0000 р Мен commands calls Files ( Ғ/ ), Append ( А/ ), 15 6370 
14 0000 iSave ( S/ ), Delete ( D/ ), Lock ( L/ ), Unlock 16 6370 
15 0000 . 3€ U/ ) and Rename ( R/ ) have been developed for 17 6370 ЗЕС4 
16 0000 фтіпі-Ғіорры disk operation. This program should be 18 8572 CD2254 
17 0000 $allocated to &2FBH ~, and sub-program "Lift-up を 19 6575 O1DBO6 
18 oooó Modification of interpreter" and "Function key 20 6378 рвре 
19 0000 label" should be executed before boot up of PASCAL. 21 637A ОҒ RRCA 
20 0000. %Тһезе sub-programs are deleted and the program areas 22 657В ЗӘСЕ JR C,Start 
21 0000 jare used for PASCAL program areas when PASCAL is 25 637D OF RRCA 
22 0000 sbooted, 24 637E 3BFB JR Cs Trksai 
23 0000 4 25 6380 DBDB IN A, IDR) 
24 0000 4 26 6382 05 DEC B E 
25 0000 す の どーーーmーーーーーーーーーーーーーーーーーーーーーーーーー バ 27 6383 20F さ JR NZ, Trksat 
26 0000 " ' 28 4385 ЗЕра LD A, DEH i 
27 0000 Ш Disk control sub-routine 1 29 6387 Ер5564 CALL | Sub2 
28 0000 " ! 30 &ЗВА DBDA IN A, (SR) 
29 0000 елама таана у TIPSY NEY ара SBE ттар xr гыиа: л 31 638C D3D9 ойт ITRI ÀA 
30 0000 7 32 638E 2Ғ CPL 
51 0000 sdisk control sub-routine for read and write 55 es8F 57 о DA 
32 0000 LI 34 6390 за7рьа LD. As (NTRCK) 
55 0000 Pwork areas 16471H ~ 647FH 35 6595 CBSF SRL ^ 
34 0000 Sprogram areast52FBH ~ 6470H 36 6395 BA cP p 
35 0000 , 37 6396 280A Z,Heads 
36 0008 Р CR: EaU DBH jstatus or command 38 5598 2F CPL 
57 0009 Р TR: Egu рн #track tOOH ~ 45H 39 6599 D3DB орт IDR); A 5 
58 OODA Р SR: EQU ран j sector :O1H ~ 10H 40 639B 3E12 LD ay 12H 
39 00DB P DR: EQU Пән jdata :00Н ^ FFH 41 639D CD3364 CALL  Sub2 
40 00DC P DM: EQU DCH jdrive & motor 42 8540 18CE JR Teksa 
41 00DD P HS: Eau DDH fhead side select 43 63A2 % 
42 0000 Д 44 &3A2 4 Heads: LD As (NTRCKO 
43 6471 P 'RWCMD: EQU 6471H read/write command 45 ӨЗА5 CBSF SRL Ws 
44 8472 P STAD: Eau RWCMD+O1H sstart address 46 85А7 2F CPL 
45 6474 Р SIZE! EQU  RWCMD+O3H sbutes size 47 &ЗАВ DID? DUT (TR, A 
46 64756 P TRCK* — EQU RWCMD*OSH $start track 48 5344 3803 JR C,Headi 
47.6477 P SECT: ком RMCMD+O6H #start sector 49 ЗАС АҒ XOR 
48 6478 P DRNOt EQU RWCMD*07H Pdrive number 50 азар 1802 JR 
49 479 P MTCMD: EQU кисмр+овн smotor command 51 63AF ЗЕО13 Headi: LD A,O1H 4 
50 647A Р MTFLG: EQU RWCMD+O9H smotor flag 52 &3B1 SF Head2: ір E.A Б 
$1 4478 P ERFLG: EQU RWCMD+OAH serror flag 55 63B2 2F CPL 
52 647C Р ERCMD: EQU — RWCMD+OBH terror command 54 &3B3 D3DD от (HS) „A | i 
53 647D P "NTRCK: EQU — RWCMD+OCH $next track 55 6385 247Е64 ір А, (NSECT) 
54 647E P МЕСТ: EQU RWCMD«ODH jnext sector 5а &3B8 2F CPL i 
55 647F P ERSTAT: EDU | | RWCMD*OEH ferror status 57 638% DIDA QUT {SRI,A 
Sé 0000 Й 58 &3BB n í | КЫ | 
57 62ЕВ ORG — &2FBH 59 63BB %----- Sequencial read or write ----- 
58 &2ЕВ 60 азвв з { 
59 62FB DSKCNT: ЕМТ ^ 
&0 &2ЕВ 4 
%% 780 ASSEMBLER 22-004C Expansion? PAGE | 
** ZBO ASSEMBLER 22-004С Expansion» PAGE 02 12.29.83 01 &é3BB рә Searut EXX y 
02 63BC 3E94 A,94H 
01 62FB %-т--- Motor & Drive number set ОЗ &3BE CD2264 
02 62FB 5 04 63Сі 0600 \ 
03 &2FB 37864 LD A, (NTFLS) 05 &3C3 DBDB 
, 07 &3C& 3822 
Ob 6301 0602 Lo B,02H 10.2 sec delay ов 63C8 OF 
107 6303 1802 JR Less 09 43C9 3BFB 
ов 5505 060A Ünesec: LD B, OAH 91 sec delay 10 63CB EDA2 
99 0397 H 11 &3CD 20Ғ4 
10 6307 347864 Less: LD A, CDRNO? 12 6ЗСЕ SA7E64 
11 6300 Feg4 j OR ван 15 өзр2 3C 
12 630C 227864. LD (MTFLB) ,А 14 6305 327E64 
13 ӨЗОР D3DC QUT «м),а sdrive select 15 8306 РЕ11 
で be - 16 6508 2805 
15 6511 21193C Чаї*1р: LD HL, 3C19H ‚17 63DA 15 
16 6514 2В Inerlp: DEC HL 18 &3DB 20E4 
17 8515 7C LD AsH 19 è3DD 1006 
18 6516 BS OR L 20 63DF 15 
19 6317 20FB JR NZ,Inerlp 21 &3EO ЗЕО! 
20 6319 10Fe DINZ Waitip 22 63E2 527664 
21 &31B % 25 азЕ5 3EDB 
пен 5577 Ready. cheek oc 7 24 63E7 CD3364 
 e31B % 
` 3ê бй 210000 LD HL,0000H 2 s 
| 25 ӨЛЕ 2b Ready: DEC HL 27 63ED B7 k 
7126 631F 7C LD AH 28 6ЗЕЕ C24B53 
4320 BS ок t - `29 &3F1 3A7D64 
6321 СА5264 JP 2,Модіжк jdisk not ready зо 63F4 3C 
6324 DBDB IN Ar (CR) istatus get 31 &3FS 527064 
6327 07 RLCA 33 65Ғ9 B7 
6328 36F4 JR Cr Ready 54 63FA 2808 
8324 , 35 éxFC 
6325 %----- Read or Write command set ----- 36 6 さ FE 09 + 
6328. з 37 &sFD 
6320 587164 Comsets LD A, (RWCMD) e] 
632D FEOL СР 01H 39 &3FF С27085 
632F 2809 JR Z,Wtset 40 6402 189E 
6531 B7 oR ^ 41 6404 
6332 C20864 3P NZ,Error 42 6404 
6335 119442 | LD DE,A294H sread 45 5404 
(6358 1803 әк Rdset 44 6404 3D 
. 6336 118485. Wtset: LD DE, SB4H jurite 45 &405 327B64 
633D 7B Rdsett LD А,Е 46 6408 287954 
433E 21BD63 ір HL.Comrwi*l 47 &40B B7 
6541 77 ір HL) SA ав 640C 2807 
4342 уа LD AD 49 640€ 3A7864 
6343 21CC63 ір HL; Comrw2*1 50 6411 Ғево 
6346 77 LD HL) „A 51 6413 1801 
6347 m 52 6415 АҒ 
аза? %----- Prograe start ----- 55 6415 327864 
6347 з 54 6419 DSDC 
6347 3E10 un A,ioH 55 641B рвра 
6349 1807 ән Istart 56 6410 2F 
434B з 57 641E 527Ғ54 
634B 3A7B64 Start: LD As (ERFLB) ЭВ 6421 С9 ` 
634€ 3D РЕС A 59 6422 3 
634F CA0864 ЈР Z,Errer 60 6422 
8552 327B64 Istart: LD t(ERFLG),A 
6355 JED | LD A, DEH 


` 
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MM шн +. P 


BIHHEHEHINHEBE 


6452 
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%% 280 ASSEMBLER 22-004C «Expansion» PAGE O6 


01 471 
02 6471 
05 471 
04 6471 
05 6471 
O6 6480 
07 6471 


$ 


сві 
6с92 
SC4 


EE 


ШНННН 


ИНЕ НИЕ 


БЕРЕ КЕЕ ЕЕЕ ЖЕКЕ ELA ART EEEE ЗҮ 
で で で で で で で で て で 


$$ ZBO ASSEMBLER 2Z-004C <Expansion> PAGE 07 


91 &CC9 CDFA&C 
02 eCCC CDOD&D 
ОЗ «ССЕ CDSBeD 
04 &CD2 FE41 

05 éCD4 2802 

706 &CD6 18EC 

07 әсте 

ов срв 

99 acne 

10 6CDB 3E00 

11 аспа 327464 
12 6CDD D3DC 

13 éCDF 

14 éCDF 
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Sub2: іш (ERCHD),A 
CPL 
DuT (CR) A 
, 
PUSM BC 
PUSH HL 
шо B, 10H 
Sub2a! LD HL, OOOOH 
Sub2b: DEC HL 
LD AsH 
OR L 
JR 7,Sub2d 
IN А, (CR? 
CPL 
RRCA 
Sub2c* JR C, Sub2b 
POP HL 
POP BC 
RET 


Sub2dt DJNZ Sub2a 


әк Error 
$ 
ョ ーーーーー Display of "Disk not ready" ----- 
, 
Nodiskt LD DE, Msgdsk 
nse 


(MTFLG) ,A 
{DMA 
JP 1501н 


CALL 

ш A, OOH 
LD saotor oft 
our 


$return to PASCAL 
sgdskt DEFM "Disk not ready" 


jFiles, Append, Save. Delete, Lock, Unlock and 
%Непате commands are avgilable. 
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4 

fwork areas t 64BOH ~ éCAFH 
program areas! 6CBOH ~ 7249H 
sinitial start address: 71ҒЭН (Modif) 
П 

Buferit* EQU звон 


4 

Bufer2: EQU Buferi*800HM type of files 
Flname: EQU Bufer2«01H tile name 

Скіоск: EDU Виғег2+12н jlock を unlock check 
Presiz: EQU Bufer2«14H ‘program size 
Tablad: EQU Bufer2«1CH stable address 
Dtrck: EQU Bufer2*1EH jtraeck on disk 
Dsect* ЕРЫ Bufer2+iFH jsector on disk 

3 

СкхҒег: EQU Bufer2*20H number of xfer 
Ckcomd: EQU Bufer2*21H $command check 
Xferad: EQU Bufer2*22H jxfer address 
Скжесі: EQU Buter2*24H schecked sector 
Ndsect: EQU Bufer2«25H jrequired sector 
Wantadt EQU Bufer2*258H jreauired address 
Сһскад: EQU Bufer2*28H ісһескей address 
Finlad: EQU Bufer2*20H search final adr. 
Merogst EQU Bufer2«2CH sprogram size 
Mtrck:  EQU Bufer2«2EH Ptrack on memory 
Msect: EQU Bufer2*2FH sector on memory 


Prgend: EQU 62F7H 
Зекет: EQU &87EH 
Prtect: EQU る 4A0H 
Offsett EQU 0480H 


jseek end address 


4 
3МОМІТОН sub-routines 


BRKEY: EQU 0527н 
LETNL: EDU 0764H 
PRNTS: EQU O&53AH 
PRNT: EOU O63CH 
MSG: EQU O6BSH 
BUFER: EDU 1100H 
KNUMBS: EQU ОВЕЗН 
БЕТІ:  EOU OBESH 
SAME: — EQU О5СӨН 


Files: CALL Rdfile 
CALL Xferi 
CALL DS だ RD 


LD As OIH 

ыр (Ckxfer),A 
LD HL, Buferi 
LD (Xferad) 。 HL 


Floop! CALL BRKEY 
JR Z,Stpout 
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CALL — Xfter2 
CALL Fjudəe 
CALL — Add20H 


СР 41H 
JR Z,Stpout 
JR Floop 
5 
%----- Moter stop ----- 
, 
Stpoutt: LD A, OOH 
LD (MTFL6) А 


ouT (DM) ,а 
4 
%----- Out of command ----- 


jdirectory & table area 


prog. end address 


seek first address 
foftset tor calculation 


15 UK ) 
16 6CDF C30113 _ Alloutt JP |  1301H SCA 
17 &СЕ2 RE SSE C aE M 
18 СЕ2 %----- Xferi, BOOH bytes disk 69 Buferi ----- | 
19 &СЕ2 % Ат riri. ^ i 
20 éCE2 210008 Xferi! LD HL, OBOOH LL 2 
21 ӨСЁ5 227464 LD “(SIZE),HL tsize OBOOH | A 
22 &СЕВ 218064 LD Buferi NS 6 le 
25 &СЕВ 227264 to ISTAD), HL зегі set 
24 &СЕЕ 3EO1 LD A,01H ve 
25 &CFO 327964 LD ‹мтсмр›,А keotor on ` М 
26 6СЕЗ C9 RET ) У 
27 &CF4 $ z 
28 6CF4 %----- ХҒеғ2, 20H bytes from Buferl to Bufer? ----- 
29 &cF4 4 
30 eCF4 2АА25С Xfer21 LD HL, Oc enad? 
31 АСЕ? 1180C LD DE,Bufer2 
32 ЫСҒА 012000 LD BC, 0020H 
33 &CFD EDBO LDIR 
34 ЫСҒҒ C9 
35 &Doo 4 
зь époo %----- ХҒег5, reverse of Xfer2 ----- 
57 epoo $ 
38 6DOO 21806C Xfer3i LD HL, Buf er2 
59 &D03 EDS5BA26C р DE, (Xferad) 
40 6D07 012000 LD BC, 0020H 
41 &DOA EDBO LDIR 
42 6DOC ヒマ RET 
43 &DOD ; 
44 6DOD' 3----- Judge of file name L others 
45 &DOD 4 * 
46 6DOD 3ABO6C Fudge: LD А, (CBufer2) 
47 6010 FEBO СР зон 
48 6D12 2816 JR Z,Master smaster or slave 
49 8014 FEAO СР AOH 
50 6016 СО RET Nz 
S1 5017 114070 LD DE,Msapas 
52 6D1A CDB506 Judioks CALL MSS 
53 éD1D CD436D CALL Lockek 
54 6020 11815С ш DE,Flname 
55 р25 CDBSOe CALL MSG 
56 6D26 CD6407 CALL CENL 
57 &D29 С9 ВЕТ 
58 502А Uu 
59 &D2A CD6407 Master! CALL LETNL 
60 6D2D 3AB16C Lo A, (F1nane) 
%% 1780 ASSEMBLER 2Z-004C <Expansion> PAGE OB 12.29.85 
01 8050 ҒЕОО cP OOH 
02 8052 200A JR NZ,Slave 
O3 8054 114070 LD DE, Msomst 
04 6057 CDBS06 MSasə: CALL mss 
OS ырза CD6407 CALL LETNL. 
оь 6D さ D C9 RET 
07 6DSE 114770 Slave: LD DE, Msgsiv 
ов 041 1BF4 әк 
09 045 5 
10 &D43 3A926C Lockck: LD A, (Cki ocky 
11 &D4& ҒЕОО СР sunloek 
12 5048 200A JR NZ,Dsplok 
13 ыма CD3AO5 CALL PRNTS 
14 рар CD3A06 Lokout+ CALL — PRNTS 
15 &D50 Срздоь CALL — PRNTS 
16 055 С? КЕТ 
17 5054 ЗЕ2А Dsplokt LD A, 2AH slock 
18 6DSé CD3CO6 CALL РЯМТ 
19 8059 1ӨҒ2 JR Lokout 
20 5DSB % 
21 éD58 %----- Addition of 20H ----- 
22 6DSB Д 
25 058 2AA26C Add2OH* LD HL, (Xferad) 
24 &DSE 112000 LD DE, 20H 
25 051 19 ADD HL, DE 
26 &D62 22A26C р (Xferad), HL 
27 6065 3AAOGC LD A, (Ckxfer) 
28 éDée зс INC ^ 
29 6D69 32A06C LD (Ckxfer),A 
50 &D&C C9 RET 
31 6рьр 5 
52 ары) 4 
33 ымжо ョ ーーーーー Read files from disk to Buferi ----- 
за арер 4 
55 6060 ЗЕО1 Rdfile: LD A,O1H 
Зе &D&F 527854 LD (TRCKO «A strack OIH 
37 6072 327764 шо (SECT A ssector OIH 
38 6D75 C9 RET 
39 6076 LI 
40 6D76 %----- Display of "File name ?" 
41 &D76 4 
42 8076 11B170 Fnames LD DE, Msgfnm 
45 079 CDBSO6 CALL MSG 
44 6D7C 3E2F LD A, 2FH 
45 6D7E 32E3OB LD (KNUMBS) , A 
46 6081 110011 LD DE, BUFER 
47 004 CDESOB CALL GETL 
48 6D87 % 
49 5087 110С11 Renackt LD DE, BUFER+OCH fcheck for Rename 
50 eDBR 1^ Lookt LD А» (DE) 
51 6DBB РЕ2С cP 2сн 
52 рер 2807 JR Z, Change 
55 6DBF FEOD СР 
54 8091 っ BOD JR Z,Fnamok 
55 6095 15 INC DE 
За &D94 18F4 JR Look 
57 609 4 
58 4095 3EOD Change: LD A, орн 
59 6098 12 LD (DE); A 
60 8099 13 INC DE 


зз 280 ASSEMBLER 22-004C «Expansion» PAGE 09 


98552582082 
: 
š 


12.29.83 


A, (DE) 
орн 


Z,Allout somitt no file name 


jomitt no file name 


1 
%----- Read trom disk ----- 


4 
7 DSKRD: LD 
RET 


arooH | 
(RWEMD) 。 A sread 


s$s 280 ASSEMBLER 27-004C Expansion» PAGE 10 


383882885 
2 


Сарвас 
соғавс 


ЈР Z,Stpout 
CALL Xfer2 
1 
р А, Gufer2) 
СР оон 
JR Z, Incres 
з 
LD DE, BUFER+OCH 
LD HL,F1name 
LD в,оғн 
4 
CALL SAME 
JR Z,Write 
; 
Incres: CALL fidd20H 
СР 41H 
JR NZ,Clooe 
4 
р A, (Ckcomd) 
ЕР 05H 
JP Z, Save 
Dspnot: LD DE, Msgnot 
CALL mse 
JP Stpout 
4% 
%----- Carry out Lock k Unlock 
% 
Write: LD A, (Ckcomd) 
СР O2H 
JR NZ, Un1 ock 
LD A, 2AH 
дк Lock 
Unlock: CP дін 
JR NZ, DRAcom 
LD A, OOH 
Lock: LD (Cklock),ñ 


CALL хғее3 
CALL DSKwT 


12.29.83 


$jume to SAVE 


ЈР Steout 
, 
4----- Judge of Delete, Rename k Append ------ 
, 
DRAcom: LD А, CCkcomd? 
СР озн 
JR NZ, RAcomd 
LD A, CCklock) 
ЕР 20H 
JR NZ,Delcon 
% 
Protct: ір DE,Msgwpt 
CALL MSG 
JP Stpout 
Ц 
Delcon: LD A, OOH 
LD (Bufer2), A 


CALL Xfer さ 
CALL DSKWT 
JR Delete 


#ーーーーー Rename and Append Check 


%% 180 ASSEMBLER 22-004С Expansion? PAGE 11 


01 5Е7Ь 
02 6E7B 
ОЗ ФЕ7Е 
04 6E80 
05 5^ЕӨ2 
оь 6EB4 
07 &EB& 
ОВ 6EB? 
09 &EBC 
10 5ЕВЕ 
11 ФЕӨҒ 
12 eEBF 
15 6EGF 
14 6EBF 
15 5ЕВЕ 
16 6Е92 
17 E95 
18 6E9B 


сағіыс 
FEOS 
2840 
FEO4 
2871 
110070 
CDBS06 
C3D86C 


112071 


срвооь 
110C11 
CDESo6 


% 
RAcomdt ір A, <Сксота» 
СР оён 
JR Z,Rename 
СР оян 
JR Z Append 
LD DE, Msgale 
CALL nse 
JP Steóbt 
š 
ミーーーーーーーーーーーーーーーーーー= 
4 DELETE 
4------------------ 
4 
Delete: LD DE,Msadel 
CALL МББ 
LD DE, BUFER+OCH 
сал MSG ы 


$s jump to DELETE 


12.29.83 


s jump to RENAME 


*+ jump to APPEND 


3892922852 


33 6F2E 218064 
34 &F31 227254 
35 6F34 210004 
5% &F37 227464 
37 ЫҒЗА ЗЕОО 

58 &F3C 327664 
39 6F3F 3EO2 

40 éF41 327764 
41 6F44 CDB15D 


51 &FS4 22AC6C 


ТЕТІН 
て 
š 
у 
Š 
Š 


17 6DBe CDFB&2 CALL — DSKCNT 719 &E9B 20946C D ار‎ 
18 6089 C9 RET 20 eE9E 22АСЫС LD › 

19 ырға з 21 6EA1 CD586F CALL Csect. i 
20 ьрва 4----- Write to disk ----- 22 6EA4 2А#СЬС ір HL, CTabl ad) 
21 éDBA 4 23 &EA7 22A66C Lp (Wantad) > HL 
22 6DBA SEO1 DSKWI: LD A,01H 24 6EAA CD2E6F сал  Rdtabl 
23 &DBC 327164 Lo CRWCMD) , A swrite mode 25 éEAD 2AA66C Lp HL, (lant. 

24 &DBF CDFBe2 CALL Гөксмт ‚26 &EBO ЗАА5ЬС 。 шш As (Ndsect) y 2 
25 6DC2 3A7F64 LD A, (ERSTAT) 27 &EB3 0600 меедоні LD B, OOH 

26 6DCS 07 RLCA 28 &EBS 70 ш (HL), B 

27 6DC& 07 RLCA 29 ФЕВЬ 25 INC Hon 

28 &DC7 DO RET мс 30 бЕВ7 3D DEC А 

29 éDC8 С0ь407 CALL — LETNL 31 ФЕВӨ ҒЕОО СР оон 

ЗО 6DCB 113771 LD DE, Msgsof нгі te protected 32 6EBA 20F7 JR NZ, Мкеоон 

31 &DCE CDBS506 CALL MSG 53 &EBC CDBAGD CALL — DSKWT 

32 6DD1 C3D86C JP Stpout ‚34 &EBF CSDB6C E Stpout 

33 &DD4 D 35 5ЕС2 ' 

за &DD4 %--------------------------------------- 36 БЕС? 0 

35 арра Г Commands except for FILES 37 &EC2 Li , RENAME 

зь éDD4 ま ーーーーーーーーーーー ーー ニーーーーーーー ニ ーーーーーーーーー 38 ФЕС2 1 

37 &DD4 H 39 «ЕС? ' 

38 6004 CD766D Fnamet CALL ?Fname 40 6EC2 3A926C Rename: LD As CCkLock) 
39 &DD7 срьрьр Comdint CALL — Rdfile 41 6ECS FE2A cP 

40 &DDA CD076D CALL — Renack 42 6EC7 289C JR Z,Protct 

41 éDDD , 4 45 &EC9 210С11 ш HL, BUFER+OCH 
42 6DDD %----- Check same file name ----- 44 бЕСС 7Е Search: LD A, (HL) 

45 &DDD 4 45 6ECD FEOD СР орн 

44 5000 ЗАА16С LD A, (Ckcomd) 46 6ECF 2803 JR Z,Find 

45 50Е0 FEOS cP OSH $ SAVE 47 &ED1 25 INC н 

46 6DE2 2010 JR NZ, Carry 48 6ED2 1BFB JR Search 

47 80Е4 2АҒ?А2 LD HL, (Prgend) fend address 49 éED4 23 Findt INC н. 

48 6DE7 010100 LD BC, 0001H 50 6EDS 11816C LD DE,F1name 
49 &DEA ED42 SBC HL,BC 51 &ED8 011100 р вс,11н 

50 éDEC O1F571 LD BC, Modi € istart address 52 6EDB EDBO LDIR 

= DADP. I Е &EDF 32916C to rinane» А jomitt long name 
52 &DF1 DADFeC JP C,Allout + , 
SS арға à д LI фоті%% no prog.sirze 55 112B71 р De。 

54 6DF4 CDE26C Carryt CALL — Xferi 56 6EES CDBSO6 сал. HSB 

55 &DF7 CDBioD CALL DSKRD 57 6EEB 11816C LD DE,F1name 
56 6DFA 3EO1 LD A501H SB 6EEB CDBSO6 CALL мә 

57 &DFC 32A0eC LD (Ckxfter),A 59 «ЕЕЕ CD006D CALL xter3 

SB 6DFF 218064 LD HL,Bufer1 60 6EF1 CDBA6D CALL — DSKWT 

59 6E02 22A26C LD (Xferad), HL 

60 6EOS С02705 Clooe! CALL BRKEY 


5 
% 
5 APPEND 
, 
И 
Appendt LD DE, Msglod 
CALL 
LD DE,F1naee 
CALL MSS 
р HL, (Prgsiz) 1progran size 
LD (SIZE) ,HL 
LD A, (Dtrck) #track in disk 
LD (ТАСК ‚А 
LD A, (Dsect) sector in disk 
LD (БЕСТ›,А 
LD HL, (Prgend) sstart address 
ш (STAD),HL 
ш ВС, (Prasiz) 
ADD HL, BC 
LD BC, 0001H 
SBC HL, BC 
LD (Prgend) , HL jend address 
CALL DSKRD 
JP Stpout 
ま 
ын алына 
$ SAVE 
g———Y s: 
; 
%----- Read of byte table to Buferi ----- 
4 
Rdtabl: LD HL, Buferi 
LD (STAD) , HL saddress Buferi 
LD ` HL, 0400H 
ш (SIZE),HL size 0400H bytes 
LD A, OOH 
LD (TREK); A strack ООН. 
р A, O2H 
ір (ВЕСТ) ,А i sector О?Н 
CALL DSKRD 
RET 
4 
%----- Calclation of program size ----- 
Uu 
Cprogs: LD HL, (Proend) тепа address 
ір BC, Modi + istart address 
SBC HL, BC 
LD BC, 0001H 
ADD HL, BC 
LD (Merogs) , HL 
RET 
1 
%----- Calculation of required sector ----- 
5 
Csect: LD HL, {Mprogs) _ jprogram size 
р A,01H 
Саізес: LD BC, 0100H 
HL, BC 
JR C, Calend 


зя 280 ASSEMBLER 22-004С «Expansion? PAGE 13 


6F6B 
OB 6F6B 111671 
09 &F6E CDB506 
10 &F71 110С11 


16 6FB3 22AA6E 
17 &6F86 216064 
18 éF8? 22АВЬС 
19 &F8C SEOO 

| 20 6FBE 32А45С 


12.29.83 
INC ^ 
JR Cal sec 
Calend! LD (Ndsect), A 
RET 
' 
$----- Seek free sect in table ----- 


$ 
Savet 


イン タプ リタ バス カル の 拡張 65 


721 &F91 CD7F70 Savei! CALL — Ckspc 
22 6F94 22AB6C LD (Chckad? > HL 
25 6F97 7E LD а, (HL? 
. 24 &F9B ҒЕО1 СР 01H joccupied sector 
25 &F94 2008 JR М1,Зауе2 
25 6F9C 25 INC HL 
27 &F9D ЗЕОО LD A, OOH 
28 &F9F 32А46С LD «Скзесі»,А 
29 6FA2 1ÓED JR Savel 
30 6РАА # 
31 &FA4 SAA46C Зауе21 LD А, (Cksect) 
32 «ҒА? 3C INC ^ 
33 &FAB 52А4С ч (Cksect),A 
34 6FAB SAA56C LD А, (Ndsect) 
55 &FAE 47 LD В,А 
56 6FAF さ AA46 ビ LD А, (Cksect) 
57 éFB2 B8 СР в 
38 éFB3 2806 JR 2,8ave3 
39 FBS 23 INC HL 
40 6FB6 CD7F7O CALL — Ckspc 
41 FB? 18Dé JR Savel 
42 6FBB 5 
43 &FBB SAA56C Saves! LD А, (матесе) 
44 6FBE 4F LD cC Aa 
45 АҒӘЕ OD DEC c 
46 6FLO O500 LD B, OOH 
47 &FC2 ED42 SBC HL, BC 
48 6FE4 22A66C LD (Man そ ed) , HL 
49 &FC7 4 
50 &FC7 %----- Calc of TRCK k SECT from calc adress ----- 
Si &FC7 . % 
52 6FC7 2AA66C Calct р HL, (Mantad) 
&FCA 018004 Lp BC,0ffset joffset values 
54 FCD ED42 SBC HL, BC 
55 АҒСҒ 7C LD AH 
56 éFDO CB27 BLA ^ 
57 6FD2 СВ27 а ^ 
58 6FD4 СВ27 SLA A 
59 &FD& СВ27 SLA а 
60 éFD8 47 LD В,А 
$4 180 ASSEMBLER 22-004С <Expansion> PAGE 14 12.29.85 
01 &FD9 7D Ln AsL 
02 FDA D610 Calci! SUB 10H 
ОЗ &FDC ЗОРС JR NC,Calci 
04 6FDE ' 
05 &FDE Cii ADD А,11н 
06 6FEO さ 2AF6C LD (Msect),A 
07 &РЕЗ 70 LD Asl 
OB 6FE4 Cp3F SRL ^ 
09 6FE6 CBSF SRL ^ 
10 6FEB CB3F SRL ^ 
11 &6FEA CBSF SRL. ^ 
12 éFEC BO ADD ^B 
13 る FED 32AE6C ір (Mtrck),A 
14 6FFO % 
15 6FFO %----- Write of table to disk ----- 
16 éFFO , 
17 éFFO 2AA66C ш HL, «Мап% ад) 
18 &FF3 3AASéC ш А» (Ndsect) 
19 &FFó 0801 Inpernt: LD B,01H soccupi ed 
20 éFF8 70 LD (HL? +B 
21 6FF 23 INC HL 
22 ағға 3D DEC ^ 
23 éFFB ҒЕОО CP оон 
24 FFD 20F7 NZ, Inprnt 
25 6FFF CDBAeD DSKMT 
26 7002 
27 7002 free directory ----- 
28 7002 < 
29 7002 CD6DéD CALL — Rdfile 
30 7905 CDE26C CALL Xfari 
31 7008 CDB16D CALL — DSKRD 
32 700B 53Е01 ш As OIH 
33 7000 32A06C Lo (Ckxfer) ,А 
34 7010 218044 LD Hls Bufer1 
35 7015 22A26C LD (X€erad) ,HL 
36 7016 CDF46C C#ree: CALL Xfer2 
37 7019 завовс ш A, ‹Ви#е=2› 
38 701С ҒЕОО c оон 
29 701E 2809 әк Z.Free 
40 7020 CDSB6D CALL — Add20H 
41 7023 FE41 СР 41H 
42 7025 20EF JR NZ.Cfree 
43 7027 1B6E JR Not spc 
44 7029 D A 
45 7029 %----- Write of file narb to directe y 
4% 7029 $ 
47 7029 3EAO Freet LD A, OROH jPASCAL file 
ав 7028 32805C шр (Bufer2),A 
49 702E ЗАРЕБЬС tD A, (Mtrck) 3%ғаск 
50 7031 329E&áC р (Dtrck) A 
51 7034 ЗААРЬС to A, (Msect) sm: ~ 
52 7057 s29F6C LD (Dsect) ,A 
55 703A SEOD ш A, ODH fomitt long name 
54 703C 321C11 ш (BUFER*1CH) ‚А 
45 703F 210С11 ш HL, BUFER+OCH 
гь 7042 118158C LD DE,F1name 
57 7045 011100 р BC,0011H 
58 7048 EDBO LDIR 
59 7044 ; : 
60 704A ЗЕОО Lo A, OOH unlock 
зз 280 ASSEMBLER 22-004C <Expansiony PAGE 15 12.29.83 
01 704C 3292C ш (Скіссіз,А 
02 7оағ 2ААСЬС HL, (Mprogs) 
05 7052 22946C со (Prgsiz),HL 
04 7055 2AA66C Lo HL, (Wantad) 
05 7058 229C&C m) (Там ад) ‚н. 
` 06 7058 CD006D CALL — Xfer3 
07 705Е CDBA&D CALL — DSKWT 
08 7061 $ 
09 7051 %----- Write of program to disk ----- 
10 7061 LI 
11 7061 21F571 р _ HtModif 
12 7044 227254 1р (STAD , HL 3start address 
15 A ы ш HL, (Merogs) 
14 А 227464 ір (SIZE), HL фрғозғат sire 
15 7060 SAAESC LD A, (Mtrck) 
16 7070 327664 | Lo (TREK) A jurite track 
Pd АРЫС m 9, (sect) 
, 48 7076 527784. ір (SECT),A Pwrite sector 
% С %----- Space check in directory ----- 


66 onwz 19845. 


25 707F d 
24 707F ES Ckspct PUSH HL 
25 7080 2AAA6C Lo HL, (Finlad) 
26 7083 Ер4ВАВЫС LD BC, (CChckad) 
27 7087 ED42 SBC HL, BC 
28 7089 3802 дк CsNofile 
29 708B El POP HL 
зо 708C C9 RET 
31 708D 4 
32 7080 4 Display of "No file space" ----- 
33 708D % 
34 708D E1 Nofíle: POP HL 
35 708E 11ЕВ70 LD DE,Msənfs 
зь 7091 CDB506 CALL NSG 
37 7094 CSDBeC JP Stpout 
58 7097 % 
59 7097 4----- Display of "No directory space" ----- 
40 7097 U 
41 7097 11F970 Notspct: LD DE,Msonds 
42 709A CDBS5O6 MSG 
43 7090 CSDB6C ЈР Stpout 
44 7080 з 
45 7050 жаа? CT eS HS E 
46 7040 日 Messages 
47 7080 — eX 
48 7050 t 
49 70۸0 40415554 Msgmst: DEFM "MASTER" 
50 7044 4552 
51 7046 Ор .DEFB орн 
52 7047 534С4155 Msgslvt DEFM — "SLAVE" 
53 70АВ 45 
54 70AC OD DEFB орн 
55 70AD 504153 Msgeast DEFM "РАЗ" 
5% 70BO OD DEFB орн 
57 70В1 46695C65 Msgfnat DEFN "File nane ? * 
58 70В5 206E616D 
59 70B9 &5203F20 
60 70BD ор ОЕЕВ орн 
%% 280 ASSEMBLER 22-004С <Expansion> PAGE 16 12.29.85 


598924%097855525%205259899 0 аҢСЕЗШІРШЕЙЫЕН 535020525%8525%0652 
h 
8 


714B ор DEFE ООН 
714C 4 
714C 4 
714C 2 
714С 4 Мем commandes set 
714C 4 
714c D e bius 
714C CD1947 Upcowdt CALL 4719H jbranch for addition 
714F 1B DEC DE` х 
7150 iA LD A, (DE) à 
7151 FESS s СР 5зн icheck 8/ 
7153 2004 JR NZ,A/ 
7155 SEOS LD A, 05H 
%% 180 ASSEMBLER 22-004C <Expansion> PAGE 17 12.29.83 
01 7157 1859 JR Comdck 
02 715% FEA1 д/а СР 41H Pcheck A/ 
оз 7ї5в 2004 JR NZ,D/ 
04 7150 3EO4 m A, 04H 
05 715F 1851 JR Comdck 
06 7161 FE44 о СР ған Scheck D/ 
07 7163 2004 JR NZLF/ \ 
ОВ 7165 ЗЕОЗ ш mo 
09 7167 1849 JR Comdck 
10 7169 ҒЕ4Ь к/з СР 46H 
11 716B 2007 JR NZLL/ 
12 716D 13 INC DE 
14 7ief Рок т н. 
4 フュ 6F 
15 7171 281В E Z.7Drive 
16 7173 ЕЗ JP HL? 
17 7174 FE4C m cP 4CH 2 
18 7176 2004 R Nz,U/ ^ 
19 7178 3E02 сір я,о2н 
20 717A 1836 R Ж 
24 717С ҒЕЗ5 p "7 р 
22 717Е 2004 JR 
25 7180 3601 w 
7162- 


Msgwpt: DEFM “Write protected" 


орн 
"File not found" 


DEFB 

DEFM 

DEFB орн 
Mrgale: DEFN "Already exist" 

DEFB 

DEFM 


орн 


Мтәп4з: "No file space" 


DEFB орн 
DEFM "Мо directory space" 


Msglodt 


DEFB 

DEFM 

DEFR 

DEFM 

DEFB орн ` 
Msgdel: DEFM "Deleting: " 

DEFB 

DEFM 

DEFB 

DEFM 


5 


25 7184 FES2 вз СР 52н $check R/ 27 3268 ; М 
26 7186 2004 JR NZ, Out 28 7244 %МОМІТОН sub-routines 
27 7188 3E06 LD A» 06H 29 724A ; 
28 718A 1826 JR Condek 30 0958 Р CHRBO: EGU 0958H 
29 718C 13 Out: INC DE 3! ОСЗ Р SCRSET: EQU оьсзн 
30 7100 Е9 ЈР m X» ed d 
ЗІ 710€ » 33 724A С05809 CALL — CHRBO 
32 718€ 15 ?Drive: INC DE 34 724D 21D073 р HL>K1 abe! 2 
53 718F 1А LD А, (DE) 35 7250 110012 LD DE, 1200H i 
3⁄4 7190 FEOD СР орн 56 7253 018Ғ00 LD BC, 008FH 
35 7192 САВОЫС ЈР Z,Filez 37 7256 EDBO LDR 
36 7195 FE31 СР зін 38 7258 D 
37 7197 2805 JR Z,.Drivel 39 7258 sE19 Kdise! LD Ar 19H 
38 7199 FES2 CP 32H 40 725A 320000 LD (000CH) „A 
39 7198 2806 JR Z,Drive2 41 7250 CDC306 CALL 
40 7190 1B DEC DE 42 7280 * 
41 719€ E9 ЗР "m 43 7250 0615 LD B, 15H 
42 719F ; 44 722 3EO1 р А,дін 
43 719F ЗЕОО Теіуеі: LD A» 00H 45 7264 CD3CO6 CALL РАМТ 
44 7141 1802 JR Drive? 46 7267 1оҒ? DINZ -озн 
45 7145 ЗЕО1 Drive2: LD A, OIH 47 7269 3 
46 7185 327854 Drive?t LD (DRND) sA 48 7259 118C72 m DE, Msgl it 
47 7168 15 INC DE 49 726C CALL 
“ав 7159 1A LD A, (DE?) 50 726F 4 
49 716A FEOD СР орн 51 725Е 110072 uo DE, Hsoky1 
БО 71АС САВОБС ЈР Z,File= 52 7272 cpBsoe CALL 
S1 716F 1B DEC DE 53 7275 . 
52 7190 18 DEC DE 54 7275 112E73 LD ФЕ,Мғәку2 
53 7191 ES ЈР (HL) 55 7278 CDB506 CALL М6 
54 7182 ; 55 727B 4 
55 7182 3241C Comdckt LD «Сксота),А 57 727B 117F73 Lb DE,Msglin 
$6 71В5 15 INC DE 58 727E CDBSOo CALL 
57 71Bà 1А ір A, (DE) 59 7281 , 
58 71B7 FE2F СР 2FH 50 7281 3E14 Lp Ay 14H 
59 7189 2001 JR Z,Comck 
0 71BB E9 ЈР (HL) à 5 
- Wi ** 280 ASSEMBLER 22-004С «Expansion? PAGE 20 12.29.83 ` 
* 180 ASSEMBLER 22-004C «Expansion? PAGE 18 12.29.83 01 7285 520С00 LD (ооосн»,А 
i 02 7285 CDC306 CALL SCRBET | 
01 71BC n Оз 7289 , ; 
02 71ВС 15 Comcks INC ШЕ 04 7289 CSAO12 JP 12A0H %3шар to initialize 
03 71BD 1A LD ^, (DEJ 05 728С ' š 
Оа 71ВЕ FEOD СР орн O6 72BC 979B9B31 Meglif: DEFN “ruja ro, s s^ 
05 71CO CAD46D ЈР 2.Ғпаве sinput file name 07 7290 ФВФВФВФВ : ° 1 
06 71С5 ҒЕЗІ СР зїн ОВ 7294 ФВФВФВ52 
07 71C5 2823 JR Z, Setari sdrive 1 set 09 7298 9ВФВФВФВ 
Оё 71C7 FE32 СР 32H 10 729C ypyBB さ さ 
09 71С9 2821 JR Z,Setar2 sdrive 2 set 11 7240 9B9B9B9B 
10 71СВ FE2O СР 20M 12 7244 ФВФВФВ54 
11 71CD 200В JR NZ, Settin 13 7268 9B9B9B9B 
12 71CF ; 14 72АС ФВФВФВЗ5 š 3 i 
13 71CF 13 Comcki! INC DE 15 72BO ФВФВФВФВ ФЕРМ — 2 
14 7100 1А LD A, (DE) 16 72B4 9B9B9B34 ç NER Y 
15 7101 FEOD СР орн 17 7298 ФВФВФВФВ 
16 7105 CAD46D ЈР Z,Fname sinput file name 18 72BC 9В9В9В37 : 
|17 7104 FE20 СР 20H 19 72CO 9В9В9В9В 
18 7108 28F5 JR Z,Comcki signore 20 72C4 9B9P3b38 
19 71DA % 21 72C8 ФВФВОВФВ DEFM w—p y>" 
20 71DA 210С11 Бек#1п LD HL, BUFER+OCH 22 72СС 9B989B39 
21 7100 1А ` LD А, (DE) 23 7200 9B9B9B9B 
22 71DE $ : 24 7204 9B9B9B31 
23 71DE 77 Comck2t LD ` (HL) +A jfile name set 25 7208 30%ВФВ95 
24 71DF 25 INC HL 26 72DC op DEFB орн 
25 71Е0 15 INC 27 72DD 94206651 Msgkylt DEFM "| false true downto real; е 
26 71Е1 1А р A, (DE) 28 72Е1 6C736520 
27 71Е2 FEOD СР орн 29 72Е5 20207472 е 
28 71Е4 20F8 JR М2, Сотск2 20 72Е9 75652020 Ve. 3 Ç 
29 71Е5 77 LD (HL? ,A 31 72Ер 20646F77 ж; 1 * ж 
ЗО 71Е7 C3070 , Р Coedin 32 72F1 &E746F20. $ 
31 71ЕА з 33 72Ғ5 20724561 ; * 
32 71ЕА ЗЕОО Setdri: LD A, OOH 34 72F9 6C3B2020 
33 71EC 1802 JR Setdrv 35 72Ғ 20 
34 71ЕЕ ЗЕО1 Setdr2! LD A,oıH 36 72FE 63685172 DEFM — "char % жон" 
55 71FO 327864 Setdrvi LD (DRND),A )drive number set 37 7302 3В202020 3 N E И p 
Зь 7iF3 18DA әк Сраскі 38 7306 666CéF61 š 
37 74Ғ5 - D 39 730A 7428 
38 7Р5 ; 40 730C 20207472 DEFM =" trunki until then — else |" 
39 71Е5 %---------- ---- ---------- 41 7310 756Е6В28 
40 71Ё5 f‘ Lift-up & Modification of interpreter 42 7314 20202075 
41 71F5 ます ーー ーーーーーーーーーーーー — 43 7318 5E74695C 
42 71Ғ5 ま à 44 731C 20202074 
43 71Ғ5 ЗЕСЗ Modif’ LD A,OC3H jfor branch a5 &8555E20 М 
44 71F7 324C43 m сазасн),а 46 7524 20202065 
45 71РА 214C71 LD HL,Upcomd 47 7328 5C734520 
44 MFD 224043 р (434DH) , HL ffor new commande set 4B 752С ФА 
47 7200 Й 49 7520 ор DEFB орн 
48 7200 21F571 Liftupt LD HL, Modi f 50 732E 94205265 Negky2: DEFM — "| begin procedure function =" 
49 7205 22FA12 m (12FAH) HL 51 7332 67695E20 3 + 
50 7206 225713 р (1357H) 。 HL 52 7336 70725F53 \ 
51 720% 227415 LD (1574H), HL 55 733A 65647572 
52 720C 15 LD (15B6H) , HL 54 733E 25205575 
53 720F 22С015 LD (15COH) , HL 55 7542 6E637469 
54 7212 22F516 ір (L6FSHD 。 HL Зь 7346 5F5E203A 
55 7215 222517 LD (17258) HL 57 7344 502020 
Se zue 229018 LD (189DH) , HL SB 7340 696E7465 DEFM — "integer 
57 7218 223ESG . LD (SBSEH) , HL 59 7351 67557238 
58 721€ D 60 7355 20525F5F 
5% 721E ЗЕОО р A, OOH 
%0 7220 210000 [m HL, 0090H 
s %% 280 ASSEMBLER ファ ーOO4C «Expansion? PAGE 21 ` 
| - 01 7359 6C65616E 
саж 280 ASSEMBLER 22-004C- «Expansion? PAGE 19 12.29.83 s 7350 38206172 А 
01 7223 320012 | LD (1ї2А0н›,А > бу شل کا‎ ууа раз зна Ek 
02 7226 220112 " a RD (12018) HL A prae d галере 
05 7229 32FD12 ; | уч (42FDH) à сөдер ым 
04 722С 22ҒЕ12 Lp て 1 2FEH) ‚н. 07 7371 58955 
05 722F 322918 LD (1A2BH) sA 08 7375 20202020 
Ob 7232 222С1А LD ( 3A2CH) , HL 09 7379 855Е5420 
07 7255 222614 LD (1A2EH) , HL 10 737D Фа 
OB 7238 223014 LD (143OH) ; HL Le DEFB оон 
09 723B 223214 LD (1A32H) , HL 12 7372 98909998 Msglini DEFM "< HITS ЗА RSE TR 
10 723E 210202 LD HL, 0202H 15 7343 sasawaqa д y 
11 7241 220918 Lp (1809H) , HL 4 7397 
12 7244 212020 LD ` HL,2020H w 
13 7247 22СС18 LD (18CCH) , HL nr E 
14. 7246 : 14 738F 9ВФВФВФВ 
15 7244 ; 17 7395 ФВФВФВФВ 
16 724A ұрысты ылы SIR ы 18 7397 9B9B9B9B 
i 22 i | EI 
1 и Function кеу label 1 кемен 
19 720A А : 21 7343 ФВФВФВФВ DEFM 
20 724A 人 22 7347 9ВФЕФВФР 
21 7248 4 2% fw ーー 
22 7244 ; 25 7383 ?в?втьФ 
% pe Сарай, of function кеу 26 73B7 9B9B9B9B 5 x 
25 724A Program areas! 724AH ~ 745AH Араны DEFN 
.2ë 7244 $scroll 0 ~ 20 column 
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29 73C3 9ВФВФВФВ 

30 73C7 9B9B9B9B 

31 73CB 9ВФВФВФЬ 

32 73EF Ор DEFB орн 

33 7300 52456759 Klabel! DEFN — "begin “ 
за 7504 6Е20 

35 750ь Ор DEFB оон 

За 7507 70725F53 DEFM — "Procedure 
37 73DB 65647572 

38 73DF 5520 

39 73E1 ОО DEFB орн 

40 73E2 66756E63 DEFM “function = 
41 75Е6 74695F6E 

42 73EA 20 

45 73EB oD DEFB орн 

44 73EC ЗАЗ DEFM "i=" 

4S 73EE OD DEFB Орн 

44 73EF 696E7465 DEFM "integer 
47 73F3 57657258 

48 73F7 OD DEFB оон 

49 73F8 ь2ағағыс DEFM — "boolean 
50 73FC 65616E3B 

$1 7400 ор DEFB орн 

52 7401 61727261 DEFM "атташ" 
55 7405 7955 

54 7407 ор DEFB орн 

55 7408 72657065 DEFM “repeat " 
56 740C 617420 

57 740F ор DEFB орн 

58 7410 7758695C DEFN "while ~ 
59 7414 6520 

60 7416 OD DEFB орон 


%% 180 ASSEMBLER 22-004C Expansion» PAGE 22 
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Elder Man の 


本 誌 7 月 号 で 発表 し た , お も し ろ ゲ ー ム 1 
等 賞 受賞 作品 「 前 戦 基 地 」 の カセ ッ ト を, リ 
ー ダ ー ス サー ビス の 一 環 と し て 始め まし た 。 

第 2 次 大 戦 , ヨー ロッ 戦線 最大 の 攻防 戦 。 
連合 軍 は 総力 を あげ て ノル マン ディ 上 陸 作 戦 
を 敢行 し た 。 上陸 後 , ヨー ロッ パ 大 陸 の ドイ 
ツ 軍 を 一 掃 す べく , 前 戦 基地 を 築き , 一 斉 攻 
撃 の 準備 を 整え て いる 。 ド イツ 軍 は 死 命 を 決 
する この 戦い に 反撃 を 開始 し た 。 さ あお, B» 


| この 前 戦 基地 を 守り ぬく の だ 。 


Oh/ シ リー ズ 掲 載 ブ ログ ラム の 
m-—— 最 容 の の パソ コン ショ ッ プ で 好評 発売 中 / ww リー ダー ズ サ ービス 


MZ- 5500 用 
マッ ハ 3 PC-9801 用 


「 フ ライ トシ ミュ レー タタ 


5 イン チ フ ロッ ピー ディ スク 6,8008 
8 イン チ フ ロッ ピー ディ スク 7.800 円 
(MZ-5500 用 は マウ ス 使用 可 、5 イ ンチ の み ) 
高速 3 D グラフィック を 駆使 し た , 本 格 的 
フラ イト シミ ュ レ ー タ 。 完 璧 な 3 次 元 処理 で , 
敵 機 , 地形 と も リア ル に 表現 され , 着陸 時 の 
振動 や 敵 機 の 空中 分 解 、 失速 も シン ミュ レー ト 
され て いる 。 こ の 迫力 に つい て いけ る か 1『? 


smeer (Ж) 日 本 リ ソ フ トバ ンク 出版 


ТЕГ 


12.29.83 


PC-9801 用 


「 ス ペー ス ・ エ ン バ イ ア 」 


5 イン チ フ ロッ ピー ディ スク 5.800 円 

8 イン チ フ ロッ ピー ディ スク 6,800Ғ3 

君 と コン ピュ ー タ が , 国連 軍 ・GIGA 軍 に 分 
か れ て , 銀河 全域 を 背景 に 一 大 植民 地 争奪 戦 
争 を 開始 し た 。 極め て 過激 で , 帝国 主義 的 ・ 
軍国 主義 的 な , 大 型 ウ ォ ー・ 
с А» 


wide: 


T!02 東京 都 千 代田 区 四 番 町 2-| 
TEL. 03-261-4095 
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バ ソ ニン 件 二 家 と 5 グー ム 


FORESIGHT MER: 順 二 


р-а 


ワン ボー ド マ イ コン を 拡張 し て タイ ニ ィ (小さ い ) ベー シッ ク 
を 走ら せ て いた 53 年 ご ろ , 海 の 向う の アメ リカ で は APPLE П, 
PET, TRS-80 と いう 強力 な マシ ン が 発売 され まし た 。 

これ ら は 当時 , パソ コン 御 三家 と いわ れ , マニ ア 垂 洪 の 的 で し 
た が , 今夜 は まほ まず, これ ら の マシ ン を ふり 返っ て み ま し ょ う 。 

つぎ に , その ころ 創立 され た キマ グレ コン ピュ ー タ クラ ブ ( き 
まこ ん クラ ブ ) を 紹介 し ます 。 

同好 者 と の 楽し い お し ゃ べり , そし て Q&A に よる 技術 アッ プ 
の た め に 数 多く の マイ コン クラ ブ が 生ま れ ま し た 。 し か し な が ら , 
その 大 部 分 は 数 年 も 続か ず に 発展 的 に 解消 し た よう で す 。 

きま こん クラ ブ は 相変わらず アク ティ ブ な 活動 を 続け て いま す 。 
そし て , パソ コン に の め り こ ん だ マニ ア が いか に 大 きく 成長 し た 
か も , 今夜 の 話 を 通じ て わか る と 思い ます 。 

ゲー ム と し て は , 当時 の 会 報 か ら , 会 員 創作 の 「15 ゲ ー ム 」 を 
と り 上 げ , MZ に 移植 し まし た 。 すべ て の シャ ー プ BASIC に 移植 
で きま す 。 30 分 も あれ ば キー イン で きま す 。 

それ で は 今夜 も , MZ に プロ グラ ム を 入れ て お 楽し みく だ さい 。 
РЕТ が 発売 され た ころ を し の びな が ら 。 


オキ ーー キーー キ あ Z= が れ の パソ コン 御 三 家 キ ー キ ー キ ー キ ー キ 


昭和 53 年 ご みろ の マニ ア に と っ て の 憧れ は アメ リカ の パソ コン で 
tss 

TK-80BS な どの タイ ニー な も の に 比べ , 非常 に 強力 な ベー シッ 
ク を 持ち も ,。 し か も スイ ッ チ ON で BASIC が 走る の で す 。 い ろ い ろ 
な ゲー ムツ ソ フト の 話題 も 海 を 越え て 伝わっ て きま し た 。 

まだ , その 頃 の BS は , ① ス イッ チ を 入れ , ②TK-80 ボ ー ド 上 に 
ある RESET キー を 押し て LED 8 個 を 0 L L, ③16 進 キー で BA 
SIC イン タプ リタ の スタ ー ト アド レス E000 を モッ ト し, ④RUN 
キー を 押す 。 こ れ で 初め て BASIC モ ー ド に な る の で し た 。 

表 1 は アメ リカ の いわ ゆる 御 三家 , APPLE П, PET, TRS 
が 発表 きれ た ころ と 日 本 の それ を 比較 し た も の で す 。 ま た この 3 
種 の マシ ン の 人 性能 を 表 2 に まとめ まし た 。BS の 仕様 (E1) に 比 
べ て いか に 強力 か , が わか る と 思い ます 。 

特に APPLE TI は 52 年 5 月 発売 当時 か ら カ ラーBASIC で あり , 


ЖІ 日 米 パ ソコ ン 勧 らん 期 年 表 
ALE TOS wx pondre 
PET-2001 (4) — 


APPLE П (5) 第 1 回 マイ コン ショ ウ (5) 


“ソード M200 (9) 
Tk-80BS (12) · 


ベー シッ クマ スタ ー (9) 
` MZ-80K (12) . 


( ) は 発表 月 


TRS-80 1 (12) 


R2 アメ リカ 御 三家 の 比較 


メー カー アッ プル コモ ドー ル タン ディ RS 

米国 発売 52・5 Mt op. 
価格 $1,298 (4K) | 559 (AK) | $399 (4K) 

日 本 発売 52-10 。 536 - DISes:. 
価格 714,000 (16K) | 298,000 (16K) | 198,000 (4K) 


CPU 6502 6502 |7 


BASIC ROM 
& 

ディ スプ レイ 
カセ ッ ト 

主 な ゲー ム ソ フ ト 


6K 

722560 
280x 192 F Y F 
150025 — 

イン ペー ダー 
スタ ー ウ ォ ー ズ 


8K 
1000 ボ ポー - 


ルナ ラン ダー 
スタ ー ト レッ ク _ 


を その ハー ド は いま だ に 健在 で す 。 周辺 機器 も 充実 し し ソフ ト も ウ 
ン 万 本 し いわ れ , アッ プル マニ ア は 強力 な 結束 の も と , マイ コン 
ライ フ を た の し ん で いま す 。 

これ に 比べ て 日 本 の メー カー の 激しい 新 機種 の 発表 , 毎年 更新 
する I 旧 マシ ン の プラ ッシュ アッ プ 。「 互 換 性 は ある 」 と メー カー は 
言っ て も 一 部 の BASIC に 限ら れ , マシ ン 語 に な る と 疑問 で す 。 

この 点 , わが シャ ー プ は クリ ー ン 思想 を 堅持 し ,.MZ-700 で SP- 
5030 が 走る の は 感激 で す 。53 年 12 月 「 マ イコ ン 博 士 」、 の キャ ッ チ 
フレ ー ズ で MZ-80K 発表 , 195.000 円 で し た だ た 。 こ の ころ の プロ グラ 
ム テ ー プ を 現在 MZ-700 で 走ら せ て いま す が , これ は 他 機 種 に は 
絶対 に で き な い 芸当 で し ょ う 。 
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キキ キー キー きま こん クラ ブ 設 立 の ころ キー キー キー キー 


パッ ユン の 組み 立て , 製作 (ハー ド ) t, プロ グラ ム 作 り (v 
フト ) 6, その 人 の 人 人 生 経 験 の 範囲 内 を 動き 回 っ て いる 。 こ れ は 
パソ コン に 限ら ず , すべ て に つい て 言え る で し ょ う 。 ル ー ル ゃ 遊 
び 方 を 知ら な い ゲ ー ム の プロ グラ ム は 作れ な い 一 こと を 考え れ ば 
わか る と 思い ます 。 

パソ コン の 世界 を 広げ る た だ た め に , マニ ア を 呼び 合う こと に つい 
て は 昨夜 も ふれ まし た 。 NEC マ イコ ンク ラプ ニュ ー ス は B4 版 8 
ペー ジ 隔 月 発行 で し た が 紙面 を ユー ザー に 開放 し , 交流 を 求め る 
マニ ア の 声 の 広場 し な り ま し た 。 

これ ら の 文通 の 結果 . つぎつぎ に クラ ブ が 誕生 し て いき まし た 。 
この ニュ ー ス 紙 の 54 年 7 月 ,「 き まま な 集 り の 場 を 」 の 呼び か け に 
応じ て , 私 も 安立 隆一 きん を 中 心 と し た きま こん クラ ブ に 入会 き 
STORRS A L 

主力 メン バー を 2, 3, 紹介 し まし ょ う 。 

安立 隆一 氏 当時 , 足利 工業 大 学 電気 工学 科 在 学 , クラ ブ の 創 
立 者 で 会 長 で す が 。 結局 パッ ュ ン の プロ に 。 彼 に つい て は 後 章 で 
詳し く ふ れ だ いと 思い ます 。 

佐々 木 徹 氏 鯖江 市 武生 高校 の 先生 , 現在 マイ ユン 各誌 に 成績 
処理 な どの 学校 で の 実務 プロ グラ ム を 発表 し て いる 北陸 の 大 御所 
で す 。 福 井 マ イコ ンク ラブ の 代表 者 。 彼 ほぼ の 人 も ビ キ ナ ー の こ 
ろ は NEC ニ ュー ス 紙 に 「 レ ベル II の PRINT 方 に は と て も 苦労 し 
まし だ た 。 ど うし て も 思う よう に いか ず , Bit IDn を 訪ね て 質問 し た 
と ころ PRINT 文 と CURSOR 文 を 混ぜ て 使っ た た め と わか り ま し 
た 」 と 述べ て いま す ( 注 2 )。 

片山 博 氏 名 廊 を ふる い , 会 報 を 編集 し まし た 。 京 都 大 学 工学 
部 化学 科 卒 業 , 住友 金属 鉱山 (株 ) 中 央 研究 所 勤務 、 8080 系 の マシ 
ン 語 の 使い 手 と し て は 会 の トッ プク ラス で す 。 

13 才 の 桶 一 平 君 か ら 73 才 の 渡辺 義 太 郎 氏 ま で ユニ ー ク な 会 員 が 
£6, 多 士 済 々 で す 。 


キー ニー キーー キ ーー キ あ る マニ ア の 成長 キキ ーー キー オー キ 


この 当時 の マニ ア が 成長 し て 現在 の パッソ コン 界 を リー ド し , あ 
る い は 縁 の 下 の 力 持ち に な っ て いる , と 第 2 夜 に お 話し し まし た 
が , ここ で 前 述 の 安立 会 長 の お 話 を し て み ま し ょ う 。 

彼 の パソ ュ ン へ の の め り 込 み は TK-80 か ら 始 め , BS を 経由 し て 
いる の で す が , 彼 が 昭和 54 年 , 各誌 に 投稿 し た レタ ー お よび 自作 
プロ グラ ム の リス ト が 表 3 で す 。 

これ を 見 る と ソフ ト 派 と 思わ れ ま す が , 彼 の 得意 の 分 野 は ハー 


70 oni 1984.5. 


R3 ある マニ ア の 昭和 54 年 の 活躍 


プロ グラ ム 7 点 の 交換 を 求め る 
ボー ルキ ャ ッ チ ゲー ム 

きま まな 集 り の 場 を 群馬 県 内 BS の つど い 
プロ グラ ム 最 近作 8 点 の 交換 を 求め る 

オプ ショ ンコ マン ド の 自動 書き 込み 

パイ オリ ズム グラ フ プ リン ト プ ロ グラ ム 
きま こん クラ ブ 募 集 会 費 月 額 60 円 

プロ グラ ム 交 換 を 求む 。 近作 8 点 
宇宙 の クズ 屋 ゲ ー ム 

ゴキ プリ タイ ジ ゲ ー ム 

ロボ ッ ト 対 UFO 

馬 と び 持 棋 
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N NEC ク ラブ ニュ ー ス 
1/03) I/O 別冊 BASIC ゲー ム 徹 底 研 究 


表 4 ある マニ ア の 著作 リス ト 


PC-6001 プロ グラ ミン グ 入 門 

パソ コン 工作 入門 

PC-8001 mkII プロ グラ ミン グ 入 門 
FM-7 グラ フィ ックス 入門 
MZ-700 ゲー ムラ イブ ラリ 


PC-8801 漢字 ワー ド プ ロ セ ッ サ ー 入 門 
PC-6001 ткі プロ グラ ミン グ 入 門 
面白 マイ コン 


PC-8001 mkII アニ メー ショ ング ラフ ィ ッ ク 
PC-8801 mkII アニメ ーション グラフィ ッ ク 


ド な の で す 。 この 後 , 大 学 4 年 生 の と き , 思い きっ て コン ピュ ー 
タ の プロ の 世界 へ 飛び 込み ヒュー モラ ボラ トリ へ 入社 , ・56 年 に 
独立 し , シス テッ 開発 を 本 業 し し て いま す 。 

パソ コン 界 に お いて , ジャ パン ドリ ー ム の 若き 実現 者 に な ら な 
いか と ひそ か に 期待 し て いる の で す 。 マ イ ュ ン 関 係 誌 へ の 寄稿 も 
ます ます 増加 , 著作 を 表 4 に まとめ て み ま し た 。 

Oh /MZ の 若き 読者 の 皆さん 。 そし て , 今 は ば キナ ー で あっ て 
も レベル は いく てら で も 高く な る こと が で きま す 。 彼 の よう に 。 
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きま こん クラ ブ で は 片山 さん の 編集 し た 会 報 が 魅力 的 で し た 。 
全国 に また が っ て いる 広い 範囲 の 会 員 の 寄稿 . マイ コン ライ フ の 


リレー 報告 , 自作 プロ グラ ム の 発表 な ど , 彼 の 筆 に か か る と 生き 
生き と し だ た も の で す 。 

今夜 の ゲー ム は , 会 員 の 中 西洋 一 さん の オリ ジ ナ ル を 安立 W 
山 さ ん が 議論 し 、 片山 さん が 可能 型 と 不可 能 型 を 研究 し て 可能 型 
だ け を 出題 する よう に 改良 し た 「15 ゲ ー ム 」 で す ( 注 3)。 リス 
ト 中 の FOR-NEXT の 段 付 : は SP-5030 の 場合 は 除い て くだ さい 。 
誰 で も ご ぞ ん じ の ゲー ム で す 。 プ ログ ラム を RUN させ る と , С 
RT 画面 に ゲー ム 盤 が 図 1 の よう に 表示 る され ま す 。 こ れ を , k k L 
ば 図 2 の よう に 並べ か える も の で す 。 

最初 の 駒の 配置 に よっ て , 実は 「 不 可能 型 」 が ある の で す 。 最 
終 配置 が 図 3 の よう に な る も の は 不可 能 型 で す 。 し た が っ て 15 枚 
の 配置 を ラン ダム に 行なう と の 確率 で 不可 能 型 が 出る こと に な 
り ま す 。 

この 可能 型 か 不可 能 型 か を 判定 し , 不可 能 型 の 場合 は 可能 型 に 
お きか えて 出題 する よう に し た の が 片山 さん の 改良 版 で 、 こ れ か 
ら 紹 介する も の が それ で す 。 両方 の 型 の 判定 に つい て は , 会 報 中 
で 何 回 か 議論 さき れ て に ぎ や か で し た 。 

オォ オリジ ナル プロ グラ ム は , 配列 が 1 元 で 1 文字 @ ( ) だ け の レ 
УІ, 改良 版 は レベ ル 有 I で 書か れ て お り , 今夜 は 私 が 両者 を 初 
め て まとめ て み ま し た 。 
〔 遊 び 方 〕 

駒の 動か し 方 は , 空地 の 行 ま た は 列 に ある 駒 を 指定 し て や れ ば 
1~ 3 枚 の 札 を 同時 に 移動 させ る こと が で きま す 。 3 枚 を 一 度 に 
動か し て も 1 手 と カウ ント し , CRT に 手数 が 表示 きれ ます 。 駒 移 
動 の や り 方 は 中 西 る きん が 大 い に 工 夫 き れ た と ころ で す 。 


に RAM を 増設 し , TV イン タフ ェ イ ス を 接続 し て 月 刊 ア スキ ー 
の Tiny BASIC を 走ら せ た と いう 数 少な い エ リー トマ ニア で す 。 
53 年 2 H, 雑誌 bit の エディ タ ・ ア セン プ ブラ を 走ら せ , 4 月 に その 
ツー ステ ー プ を 作り , 53 年 6 月 に は すでに ミニ フロ ッ ピ ー を 購入 , 
7 月 に その DOS を 完成 きせ て いる と いう , 当時 の 私 達 に は 神様 み 
だ びな 方 で し た 。 

短い ゲロ グラ ム で す 。 走ら せ て みて くだ さい 。 そ し て アメ リカ 

三家 が 発表 きれ た 「 パ ッ コ ン 元 年 」 の ころ の ゲー ム を 楽し ん で 
《 だ きる い 。 こ の くらい の 長 る な ら ば , 解読 も 容易 で , きっ と 参考 
に な る アル ゴリ ズム も ある し と 思い ます 。 
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55 年 3 月 , 再び 東京 本 社 に 転勤 , 倉敷 は わずか 1 年 半 の 生活 で 
С 

この ころ , 3 名 の 高校 年生 の 情熱 に よっ て クラ ブ FORESIGHT 
が 誕生 する の で す が , ここ 2 夜 , クラ ブ 誕 生 の 話 が 続い た の で 明 
日 の 夜 は も ちょ っ と 変わ っ た 話 を いた だ し まし ょ う 。 

ある ゲー ムツ フト が TK-80BS に よっ て 誕生 し , パソ コン の グレ 
ー ド アッ プ に よっ て プラ ッシュ アッ プ る れ て も て は や され , 一 時 
は ベス ト セ ラー に まで 上 昇 、 や が て 改良 版 の 出現 に よっ て 消 ぇ 去 
っ て いく 〈 く ,「 あ る ゲー ム ソ フ ト の 一 生 」 の お 話 で す 。 

ゲー ム と し て は , 当時 の マニ ア の 話題 し な っ た , 宇宙 の 彼方 , 
イス カン ダル を 舞台 と し た も の を 候補 に し て いま す 。 


( 注 1) パソ コン 千 夜 一 夜 第 4 夜 , Oh/MZ 59 年 4 月 号 


: e ü (#2) NEC マ イコ ンク ラプ ニュ ー ス №4, 54 年 3 月 。 8 ペー ジ 
作者 中 西洋 一 きん は 宇治 市 の 住人 , 電 々 公社 に お お 動 め て コン ( 注 3) hun 統 15 ゲ ー ム の 解析 きま こん クラ ブ 会 報 No13. 92 ペ ー 
ピュ ー タ の デー タ 通 信 が お 仕事 。 BS が 発表 る れる 前 , まず TK-80 ジ (55 年 3 А) 
図 1 ゲー ム ス タ ー ト 図 2 最終 ゲー ム 盤 図 3 不可 能 型 
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10 БЕН し る る する る で る る る る る る る る る る る る る る る る る る る る る るるる: 


15 

20 КЕМ 15 У -h 

25 REM 

30 REM тым М2-7ОО(К/С),2000 

55 КЕМ 

40 REM ORIGINAL ナカ ニシ ヨウ イキ (BS L-1) 
45 REM жол 2927 カイ ホウ М0.10 54/12 
SO REM REVISION 72fr2» ЕП» (BS L-2) 
55 REM キマ コー 2527 DAR? NO.13 55/3 
60 REM イジョウ ミネ キシ z" дор” 

45 REM OH!MZ N° YI モリ ヤゴ キト 59/3 
70 КЕМ "724 59/2/26 

75 КЕМ 

ВО КЕМ ЖХХХХЯХЯХХ ХХХ ХХХ ХХХ ХХХ ХХХ ЖЖ 
100 КЕМ 

110 КЕМ -------- Dat GOP -------- 
120 КЕМ 


130 DIM А(5,5),6(16).Т(16) 
140 FOR J-1 TO 16 
150 : は (J ) =Ј 
160 NEXT J 
170 FOR J=1 TO 31 
: K=INT(RND( 1 ) ж15+1) 
190 : L-2INT (RND (1 ) X15*1) 
: =6(К):6(К)=6(1):6()=б6 
210 NEXT J 
220 FOR 1-1 Т0 15 
230 : Т(Ј) =6 (3) 
240 МЕХТ Ј 
250 С=0 
260 р=0 
270 РОК Ј=1 ТО 14 


280 : IF T(J)<T(J+1) GOTO 310 
290 : T=T(J):šT(J)=T(J+1):T(J+1)=T 
300 : D=1:C=C+1 


310 NEXT J 
320 IF D>O THEN 260 
330 IF С-2ЖІМТ(С/2)-о GOTO 360 
540 K=INT(RND(1 ) ж14+1) 
550 68268(K):G(K) 2G (C1) : (К+1) =6 
360 REM 
370 С=0 
380 FOR E-1 TO 4 
390 : FOR F=1 TO 4 
: С=С+1 
410: А‹(Е,Е)=6(С) 
: NEXT F 


1040 PRINT "R" 

1050 CURSOR 11.3 

1060 PRINT "kkkkk 15 7“ -д ЖЖЖЖЖ" 
1070 GOSUB 5000 

1080 CURSOR 13,17:PRINT "カウ エト "С 
1090 CURSOR 23.17:INPUT "4h"? "D 
1100 ‘CURSOR 26,17:PRINT " 5 
1110 IF D>15 GOTO 1070 

1120 IF D-O THEN END 

2000 FOR E-1 TO 4 
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: FOR F=1 ТО 4 

: IF А(Е.Ғ)-р GOTO 2050 
: МЕХТ Ғ 

МЕХТ Е 

FOR G-1 ТО 4 

: IF A(G.F)-16 GOTO 3000 
NEXT б 

FOR H-1 TO 4 

: IF А(Е.Н)-16 GOTO 4040 
МЕХТ Н 

GOTO 1070 

IF E»G GOTO 4000 

Q-E-*1 

FOR J=G TO 0 STEP -1 

: А(2.ҒО)-А(1-1.Ғ) 

МЕХТ 0 

А(Е.Ғ)-16 

C=C+1 

GOTO 1070 

FOR JG TO E 


: AJ, F)=A(J+1,F) 
NEXT J 

GOTO 3050 

IF F>H GOTO 4090 


FOR J=H TO F STEP -1 

z А(Е.0)-А(Е.4-1) 

NEXT J 

GOTO 3050 

FOR J=H TO F 

: А(Е.02)-А(Е.02%1) 

NEXT J 

5070 3050 

REM 

CURSOR 14,6:PRINT " ———n—_VWA TY 
N-1:GOSUB 5040 

GOTO 5130 

CURSOR 14,5*2XN:PRINT "|"; 

FOR B=1 TO 4 

E IF А(М.В)-16 GOTO 5110 

: IF А(М.В)<10 THEN PRINT " "i 
: N$-STR$(A(N.B)) PRINT N$:" |"; 
NEXT B 

RETURN 

PRINT " "s 

GOTO 5090 

REM 

CURSOR 14,8 


PRINT " —— " 
CURSOR 14,9 

N=2: GOSUB 5040: CURSOR 14,9 
CURSOR 14,10 

PRINT " ——" 
CURSDR 14,11 

N-3:GOSUB 5040: CURSOR 14,11 
CURSOR 14,12 

PRINT "レー レー トー オーー1" 
CURSOR 14.13 

=4: GOSUB 5040: CURSOR 14.13 
CURSOR 14,14 

PRINT "ーー" 
CURSOR 1,15 


| RETURN 
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これ が プロ の テク ニ 


кэ? 


| 
| 
| 
| 


i IEEE 
Dorn mr m ы 


ENTER COMMAND? W 


f d JUNGLE CLOSE 


Time 11124 


ENTER COMMAND 2e 


Time 18:44 


ENTER COMMAND 2% 


The Time Secret | 


A ni 


>=> FP 
X1/C/D 


A LEE (5160215 C 


デ ゼ ニラ ンド は , ハドソン か ら 発 表 き れ 
た 初 の アド ベン チャ ー ゲ ー ム 。 ハ ドッ ソ ッ ン は , 
今年 は ハン パ な ソフ ト は だ き な い っ ! L, 
な か な か の 鼻息 だ びそ う で す が , この デ ゼ ニ 
ラン ド は を その 意気 込み を 示し て いる か な 7?7 
X1 用 の メデ ィ ア は 3 イン チ CD と テー の 
両方 が あり ます が , ここ は や は り 5 イン チ F 
D 版 も 発売 し て ほし いと ころ で すね 。 編集 
部 で は 3 イン チ CD 版 で チ テスト ラン る せま し 
だ 。 

プロ グラ ム は IPL スタ ー ト で , 起動 に B 
ASIC が 不要 な 点 は 評価 びき ます 。 も し 起動 
時 に , 以前 に モ セー ブ プ し た ゲー ム の 途中 結果 
が あれ ば , 自動 的 に を の シー ン か ら 始 まり 
ます が , 最初 は も ちろ ん , そん な こと は な 
(, タイ トル が 現われ ます 。 アド ベン チャ 
ー ゲ ー ム の 場合 問題 に な る の は ペイ ント の 
速度 で す が , BASIC の PAINT よ り は 速い 
ルー チン を 使っ て いる よう で , それ ほど 待 
た る れる わけ で は あり ませ ん (も っ と 速い こ 
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と に 越し た こと は な い が )。 最初 に 「STAR 
T」 と 打ち 込む と ゲー ム が 始ま り ま す 。 そこ 
は 遊園 地 デ ゼニ ラン ド の 門 で す が , チケ ッ 
ト が な いと 入れ な い 。 さ る て, どう する か … 
と いう 具合 に ゲー ム が 始ま り ま す 。 こ の ゲ 
ー ム の 目的 は , 黄金 で 作ら れ て いる と いう 
白 , 「 三 月 磨 白 」 を 見 つけ 出す こと で す 。 アド 
ベン チャ ー ゲ ー ム と し て は , X FAD 
で すね 。 な ん と か デ ゼ ニラ ンド の 外 を うろ 
つき 回 っ て , アド ベン チャ ー ゲ ー ム の 鉄則 
「 な ん で も 手 あ た り し だ い に ひ っ か きま わせ 」 
と 「 な ん で も 取れ る 物 は と れ 」 を 駆使 し て , 
いよ いよ デ ゼ ニラ ンド の 内 に 入り ます 。 入 
っ た 所 は 広場 。 先 に 進む と 6 つの お 店 が 並 
ん で 買い 物 が で きま す が , 予算 に は 限度 が 
ある の で , すべ で て の 品 を 買う わけ に は いき 
ませ ん 。 そこ で じっくり と 品 を 選ば な けれ 
ば な り ま せん 。 こ こ で の 買い 物 の し か た に 
よっ て は , の ちの ち ひ ど いこ と に な る の は 
目 に みえ て いま す 。 ST, ここ で 一 応 買い 物 


を すま せ て か ら , kl, それ ぞ れ の 見 せ 物 
を 回 りな が ら 謎 を 解い て いく の で す が , 相 
当 に 意地 の 悪い 謎 も あり ます 。 

最初 に 目 の 前 に 現れ る 見せ物 は , Wn 
海 の 海賊 」 で す 。 中 に 入る と 例 に よっ て , 
壁 に 絵 が か か っ て いたり, 封印 の 貼っ て あ 
る キャ ビ ネ ッ ト が あっ た だ たり し ます 。 よ ー〈 
考え て , 取れ る 物 は 全部 取り まし ょ う 。 ほ 
ん と に 全部 で す よ 。 

次 に この 見 せ 物 の 中 を 見 て 回 る こと に な 
る わけ で す が , 殺し の 罠 に 気 を つけ て 〈 だ きる 
о. それと LOOK コマ ンド を 忘れ ず に 。 
ここ で も , 取れ る 物 は 。 な ん で も 取っ て , 
使い まし ょ う 。 

ここ を 出る と , 次 に や っ て くる の が 「 ジ 
ャ ング ル ・ ク ロー ス 」。 まあ よう する に ボー 
ト に 乗っ て ジャ ング ル 探 検 で す な 。 こ こ で 
は , 最初 に 何 を 買っ た か が 問題 に な っ て き 
ます よ 。 

と いう で あい に , 進ん で いく わけ で す が , 
も は や この 先 は 秘密 で す の で , みな さん で 
謎 を 解い て くだ さい 。 難易 度 は か な り の も 
の で す よ 。 

この デ ゼ ニラ ンド は , 多少 欠点 も あり ま 
す が , 速度 や , 100 以 上 の 画面 数 か らし て , 
日 本 の レベ ル か ら 考 えれ ば 出色 の 一 作 と い 
Ou SSC L 3, (高野 唐 一 ) 


AUTOCRACY 


MZ-700 


よー く 考 えて 行動 し な いと 


AUTOCRACY と は 独裁 政治 の 意味 。 と 
書く と , 皆さん は ,「 る て は , 近 未 来 SF ? 」 
か と も 思う か も し れ ま せん が , 実は そん な 
中 途 半 端 な も の で は な い 。 場 所 は 南海 (だ 
と 思う ) の 離島 。 を そこ に は , イー スタ ー 島 
の よう に , モア イ ( 石 の 巨像 ) が 立っ て お 
り , 何やら 神秘 の 島 な の で す …。 

と いう わけ で , BASIC HOUSE か ら 発 
売 中 の MZ-700 用 の アド ベン チャ ー ゲ ー ム の 
テス トラ ン の 報告 で す 。 ゲ ー ム は Hu-BASI 
C を ロー し た あと , モー ニタ か ら ロ ー ド し 
ます 。 ゲ ー ム 中 は すべ て 英語 で , 最初 に 出 
て くる 作者 名 は , 国籍 不明 。 も っ と も 日 本 
人 じゃ な いこ と は だ し か で し ょ う が (な ん 
T b, MZ-700 は ヨー ロッ パ に も 輸出 され て 
いる か ら , そこ ら へ ん か な 7?)。 ど うる 最初 
か ら 謎 ば か り で すね 。 中 身 は 本 場 の 英語 ら 
(5, お そら く (高校 級 の 英語 力 が 必要 と 思 
われ ます 。: 少 な く と も , こ の ゲー ム 中 に は , 
英語 辞典 は 手 離せ な いで し ょ う 。 

ST, この ゲー ム の 目的 は , あな た の 知 
恵 と 行動 力 で 独裁 政治 を 打破 する こと で す 。 
と いっ て も , チョ ビ 蛇 を は や し た ,「 い か に 
も !」 の オジ サン が 出 て くる わけ で は あり 
ませ ん 。 実 を 言う と 、 この ゲー ム に は , А 
間 は まっ た だく 《 出 て こない ! いっ だ た だい だ れ 
が 独裁 政治 を 行なっ て いる の か る えも が 謎 
と な っ て き て いま す 。 

ST, ゲー ム を 開始 する と 始め の シー ン 
は 夜 。 ま あ , 夜 で すか ら , 寝よ うと いう こ 
t Ç, SLEEP と 入力 。 あ っ と いう 間 に 夜 が 
明け ます 。 そこ か ら は 島 を る ま よ うこ と に 
な る の で す が , これ は ほん の は じ ま り に す 
ぎ な い の で す 。 実は, ここ だ け の 話 で す が 
独裁 政治 は , 地上 で 行なわ れ て いる わけ で 
は な い の で す 。 で すか ら 早 い 話 , 地上 で 多 
少 行動 し た の ち に は , 別 の と ころ へ 移動 し 


な けれ ば な り ま せん 。 は っ きり 言っ て 海中 
な の で す 。 ST, 海中 で いっ た い 何 が 必要 
に な る の か を , よー〈 考 えて 行動 し て くだ 
さい ね 。 その後 は も う 海 底 を さま よい な が 
ら 苦 労 す る し か あり ませ ん 。 も う 少 し だ け 
ヒン ト を 出し て お く と 「 見 か け で 善悪 を 判 
断 し て は いけ な い 」 と いう こと と ,「 悪 は 減 
びな けれ ば な ら な い 」 と いう こと で す 。 
編集 室 が 受け と っ た の は , サン プル 版 で , 
マニ ュ ア ル 等 も まだ 制作 中 と の こと で し た 。 
最終 的 に どの よう な も の に な る か は , まだ 
不明 な の で す が , この ゲー ム に 良い マニ ュ 
アル (ヒン ト も ある 程度 入れ た ほう が 良い ) 
が 付け ば , お そら 〈 MZ-700 用 の アド ベン チ 
ャ ー ゲ ー ム と し て は , か な り の も の に な る 
の で は な いで し ょ うか 。 画面 も キャ ラク タタ 
単位 な の に , 十分 手 だ が こ ん で いま すし , fü 
画 速度 も 十分 速い びす ね 。 ア ド ベ ンチ ャ ー 
ゲー ム で は , 描画 速度 も 大 事 な こ と で す 。 イ 


ライ ラ し な いで すみ ます か ら 。 

た だ し , 遊ん で みて 困っ た の は 類義語 
あん まり 受け つけ な いこ と で す 。 だ た だい てい の 
アド ベン チャ ー ゲ ー ム で は , 取る な ら 5GET 
か TAKE で よい の で す が , この ゲー ム の 場 
All, も う ひ と つ 考 えて 単語 を 選ば な けれ 
ば な り ま せん 。 

と に か くも , MZ-700 用 の 本 格 的 な アド で 
ンチ ャ ー ゲ ー ム と し て , 期待 し た いで すね 。 

(高野 唐 一 ) 
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те スター アー サー 仮 謗 


X1/C 


惑星 メ フ ィ ウ ス 


君 は ヒー ロー に な れる か 


「 惑 星 メ フィ ウス 」 の X1 用 が 発売 に な っ た 
Ка, 思わ ず “ヤッ ター ググ ? と 叫ん で し ま 
っ た だ 。 多く の X1 ユ ー ザ ー も 同じ で あっ た に 
違い な い 。 それ ほど САУАУА” は 高い 
評価 を 集め て いた か ら だ 。 そし て 現在 , + 
で に FM-7, PC-8801 で は 第 2 部 「 早 黒星 雲 」 
が 発売 され, スタ ー ア ー サ ー 伝 説 の 話題 は 
最高 潮 に 達し て いる の だ 。 その 人 気 の 秘密 
は いっ だ い ど こ に ある の だ ろう か 。 


遂に 姿 を 現われ し た 画 画 画 

スタ ー ア ー サ ー 伝 説 の 第 1 部 「 惑 星 メ フ 
ィ ウ ス 」 が 最初 に 発表 る れ た の は 昨年 の 夏 。 
FM- 7 用 で カセ モッ ト テ ー ブ プ 3 本 組 で 4,800 
円 パッ ケー ジ の 装丁 か ら も 当時 と し て は , 
か つて な い 超 大 作 ほ し いっ た イメ ー ジ が あっ 
た だ た 。 も ちろ ん アド ベン チャ ー ゲ ー ム の 性格 
上 , 発売 と 同時 に 大 ヒッ ト と いう わけ に は 
いか な か っ た が, 実際 に 挑戦 し た ゲー ム 狂 
の 友人 た ちの 評価 は 絶大 びあ っ た 。 そし て 
11 月 ,「 暗 黒星 雲 」 の 開発 が 進行 し て いる と 
いう 話題 が 流れ , ヾ スター アー サー 伝説 ” の 
構想 が 明らか に な りつ つ あ る 中 , あせ る X 
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1 ユー ザー の 前 に , 遂に 「 惑 星 メ フィ ウス 」 
は その 次 を 現 わ し た の で あっ た 。 


MEG 2 5 U T || 

* ス ター アー サー 伝説 ” は アド ベン チャ ー 
ゲー ム と し て は 比類 の な い ス ケー ル を 誇る 
壮大 な スペ ー ス オペ ラ で ,「 惑 星 メ フィ ウス 」 
は その 序章 に あたる 。 その 物語 は 一 
宇宙 歴 3826 年 , 銀河 連邦 は 外 宇 宙 か ら の 
敵 ジ ャ ミル と 交戦 中 で あっ た 。 凶悪 な ジャ 
ミル の 宇宙 艦隊 に よっ て 壊滅 状態 し な っ た 
惑星 シー クロ ン の 英雄 / スタ ー ア ー サ ー・ 
ミル バッ ク は クラ ンプ トン 2 世 号 に 乗っ て 
飛び 立っ た 。 シーク ロン に 伝わる 伝説 の 剣 
バシ イッ ソード? を 求め て , 銀河 辺境 の 惑星 メ 
フィ ウス へ と 向かっ た の で ある 。 

まず カセ ッ ト の 1 本 目 ロ ー ド する と , 
いる さか 大 時 代 的 な タイ トル に は じ ま り , 
つづ いて 今度 は ちょ っ と イキ な スタ ッ フ 紹 
介 が ある 。 ナ イス / HIT ANY KEY/ 
税関 で アン ドロ イド (女性 カナ ? ) ЯН 
を ビ ピカ ビ ピカ と きる せな が ら パ スポ ー ト を 見 せ 
る よう 要求 し て くる 。 い き な り 言わ れ て も 
ある は ず が な い の だ 
が , 名 前 や 目的 な ど 
を 答え る せら れ た だ あ 
U Ç 逮捕 き れ て し ま 
5: 1068, お も 
し ろ い こと に スタ ー 
アー サー が 連行 され 
る シー ン が 画面 に 描 
か れる 。 つ まり , Z 
AR—7—J35—UST 
る 自分 自身 が 捕まる 
シー ン を 見 る こと に 
な る の だ 。 これ は ア 
ド ベ ンチ ャ ー の ドラ 


マ 性 や キャ ラク ター 設定 の 重要 性 を 意識 し 
て いる か ら だ ろう 。 

こう し て いや お うな し に 和 富屋 に 入れ られ 
る こと に な り , な ん と か 脱出 し な けれ ば な 
ら な い の だ 。 従来 の アド ベン チャ ー で は , 
OO ミル, 〇 〇 ラトル と いっ た コマ ンド 
が 基本 で あっ た が , この メ フ ィ ウ ス に は 新 
し い ア イデ ア が 取り 入れ られ て いる 。 だ と 
AA, トル と か シラ ベル と か を 入力 する と 
画面 に カー ツル が 現われ , 目的 の も の の と 
ころ へ カー ソル を 動か し て | ン | を 押せ ば よい 
の だ 。 さ ら に , ゲー ム の 進行 上 中 心 と な る 
の は 会 話 モ ー ド で ある 。 生 屋 の 中 に は 2 人 
の 異 星人 が いて , この 会 話 モ ー ド に よっ て 
いろ いろ な 情報 を 聞き だ すこ と が で きる 。 
そし て , ここ で の 会 話 が 脱出 後 の 展開 に 大 
き な 意 味 を 持っ て くる の だ 。 た だ し , いい 
か げん な こと を 聞く と,「 ち ゃ ん と し ゃ べ れ 
よ 」 と いっ て パカ に る れ て し まう 。 

$c, 脱出 に 成功 する と 1 本 目 の テ ー プ 
は 終了 で , 2 本目 に 受け 渡す ゲー ム デ ー タ 
が 出力 きれ , これ を プラ ンク テー プ ' に セー 
プ ブ し て お け ば , 以後 は 2 本目 か ら ゲ ー ム を 
始め る こと が で きる (2 本目 終了 時 も 同様 
で ある )。 か な り め ん どう で は ある が これ 
だ け の 超大 作 を も テープ 版 に する 以上 し か た 
が な いこ と か も し れ な い 。 

富屋 の あと は スラ ム 街 で , 多く の 異 星人 
た ち が 登 場 す る 。 こ こ で も 対話 が 中 心 で , 
で きる だ け 多 (の 情報 を 聞き だ る な けれ ば 
な ら な い の だ 。 ま た スラ ム 街 か ら 抜け て シ 
ティ へ 行く に は , 2 通り の 方 法 が ある こと 
も わか る は ず で ある 。 

シテ ィ で は 気軽 に 買い 物 が で きる が ,。 な 
ん と いっ て も T&E ソフ ト な ん て いう の が 
ある の が いい 。 し か も , 中 に 入る と 横山 き 
ん 自ら も 登場 する の で ある 。 


を そし て いよ いよ 3 本 目 , スタ ー ア ー サ ー 
は 広大 な メ フ ィ ウ ス の 砂漠 地帯 を きま よい 
歩く こと に な る の だ 。 それ は それ まで の 道 
の り の 何 倍 も つら くき び し い 試練 で あり , 

私 の 友人 も 何 週間 と 砂漠 を 歩き まわ っ た そ 
JIT, か (言う 私 も 何 度 も 怪獣 に 食べ られ 
骨 に な っ て し まっ た も の で ある 。 砂漠 は な ん 
と 22X22 王 484 の エリ ア に 分 か れ て いて , 画 
面 上 に 呼び び せ る マッ プ と 説明 書 の マッ プ 
を チェ ッ ク し な が ら ひ だ た すら る ま よ い 歩 き , 
最終 段階 の 宇宙 ピラ ミッ ド 内 へ と 進ま な け 
れ ば な ら な い の だ 。 そし て …… 


不屈 の 精神 こそ 画 画 画 

T&E SOFT の 作品 に は デザ イン 的 に セ 
ンス の 良い も の が 多く 〈, 特に 「 メ フィ ウス 」 
の グラ フィ ッ ク 画 面 に は 目 を 見 張る も の が 
あり ます 。 FM- 7 の 移植 版 で す が , PC-88 
01 と は 異な り , X1 用 の グラ フィ ッ ク エ ディ タ 
で 絵 を 最初 か ら 描 き 直し た そう で す 。 た だ 
FM- 7 に 比べ ペイ ント が 大 変 遅 く な っ て い 
る の は ちょ っ と 残念 で す 。 本 誌 で は 現在 , 


X1 で も FM-7 に 負け な 
い 超 高速 ペイ ント ルー 


チン が 発表 と な り , Ж 


号 で は る ら に 速い 超 光 


速 (? ) ペ イン トル ー チ 
ン も 発表 の 予定 な の て 


X1 だ か ら 遅 いと いう の 
は 少し ガッ カリ する の 
で す 。 も ちろ ん ,「 メ フ 
ィ ウ ス 」 の ペイ ント と 
て 水準 以上 の も の で あ 
り , 中 間 色 の 美しき も 
考 庶 すれ ば 総合 的 に 見 て 最高 の グラ フィ ッ 
ク 画 面 で わる こと に 変わ りあ り ま せん 。 
そし て 「 惑 星 メ フィ ウス 」 の も つ 最 大 の 
ЖЕЛІ, その バラ エ テ ィ に 富ん だ キャ ラク 
ター に ある よう な 気 が し ます 。 STAR WA 
RS を は じ め , ガン ダム , マク ロス と いっ た だ 
アニ メー ショ ン に お いて も , それ ぞ れ の キ 
ャ ラク ター の も つ 魅 力 が 作品 の 人 気 に つ な 
が る 場合 が 多く パソ コン の アド ベン チャ 
ー も この よう な スペ ー ス オペ ラ の 形 を と る 
Eb キャ ラク ター の 重要 性 は 大 きく な る 
で し ょ う 。 主 人 公 の スタ 
ー ア デー サー 自身 の キャ 
ラク ター は まだ まだ 明 
ら か に され て は いま せ 
ん が ,「 暗 黒星 雲 」 で は 
スタ ー ア ー サ ー 自 身 に 
か か わる 重要 な 要素 が 
明らか に る れる よう で 
すず 。 し が し, あ ぐ で ま で も 
スタ ダー アー サー と いう 
キャ ラク ター は , 7v 
イヤ ー で ある あな た 自 
身 が 育て て いか な けれ 


-・ き な いあ な た だ / 


ば な ら な いも の で し ょ う 。 そ の た め に は , あ 
な だ が 「 メ フィ ウス 」 の な か で スタ ー ア ー 
サー に な りき る こと が 大 切な の で あり , Z 
れ が 数 々 の 上 難関 を れ の りこ ぇ て 伝説 の 剣 バレ 
イソ ー ド ? を 得る た め の 最大 の ポイ ント に 
な る と 言え る の で す 。 

アド ベン チャ ー ゲ ー ム を いわ ゆる 謎 解き 
の ゲー ム と 考え る 限り 「 メ フィ ウス 」 は 解 
け な い で し ょ う 。 い まだ に 年 屋 か ら 脱 出 で 
どこ か に ドア の カギ が 隠 
され て いる な ん て る が し て も ムダ で す ヨ 。 
古い 生 屋 に 実際 に 閉じ 込め られ た と き に ど 
うす る か を 考え れ ば , 不屈 の 精神 を 持つ ス 
ター アー サー に と っ て 脱出 は 決し て 難し く 
は な い は ず で す 。 

「 惑 星 メ フィ ウス 」 は , ドラ マ の スケ ー ル , 
難易 度 , 人 気 , デザ イン と も に 一 級 の 出来 
ば えと いえ ます 。 そし て この 一 大 アド ベン 
チャ ー を 解い た と き , よう や 〈 バス ター ア 
ー サ ー 伝 説 ? は 佳境 へ と 入っ て い 〈 の で す 。 
第 2 部 「 暗 黒星 雲 」 の X1 用 が 1 日 も 早く 発 
売 さ れる よう T&E SOFT さん に お 願い し 
だ いと 思い ます 。 

スタ ー ア ー サ ー よ 水 遠 に 。 (斎藤 E) 
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スタ ー ラ イト 


X1/C/D, MZ-2200/2000 


アド ベン チャ ー 


STARLIGHT ADVENTURE PART I = I 


ヒー ロー を 殺し つづ け て 


以前 か ら 一 度 は 紹介 し た いと 思っ て いた 
「 ス ター ライ ト ア ド ベ ンチ ャ ー」。 ХІ, MZ- 
2200/2000 用 と も に , Part II まで 発売 され , 
今月 号 は アド ベン チャ ー 特 集い うこ と も 
あっ て , つい に 発表 する 機会 を 得 ら れ た の 
で す 。 思 えば 私 が 初め て アドベンチャー に 
触れ , 最初 に 解け た の が 「 ス ター ライ ト ア 
ド ベ ンチ ャ ーPART I」 で あり まし た 。 と 
いう の も 手伝っ て , と て も 感 怪 深い の で あ 
り ま す よ 。 ま ず は と (と お 聞き あれ 。 


HEC mm 

私 は MM。 HERO 2 5415, つね に 優 
秀 で あり 私 の 良き パー トナ ー で ある 。 ど ん 
な 辺境 域 で も 彼女 と し いっしょ な ら 行 っ ち ま 
う 。 いわ ば , ハン ソロ と ファ ルコ ン 号 の 関 
係 で あろ うか 。 も っ と も 彼ら は 映画 出演 の 
声 が か か る ほど 有名 で は ある が …。 
今回 私 は , 8 つの 星 を 持つ 太陽 系 に や っ 
て きた 。 さ る あ 何 が 起こ る か , 楽し み だ ぜ / 

まず 第 8 惑星 アイ リス に 行く と , まだ 早 
いも 追い び 出 きれ で し まっ だ 。 どう も ここ は 
最後 に 来る とこ ろ ら し い 。 それ で は , と 第 
1 惑星 ウォ ー ツ か ら 行 っ て みる か 。 

ここ は ウォ ー ツ 。 ВАК, Z 号 の コン ピ 
ュー タ に よる と , 北 と 南 に 道 が ある と いう 。 
ST, 北 に 行っ て みる と , 洞穴 が あっ た 。 
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中 に 入っ て みた が 真っ 
映 で 何 も 見 えた や し な い 。 
明か り が いる か と いわ 
れ て も , ライ ト は 持っ 
ТӨМЕНГІ. Ж. 
と りあ ぇ え ず ライ ト が い 
り ま すね 。 し か た だ た が な 
いか ら , 南 に 進ん で 行 
(t, 困り 果て た ウォ 
ーー 人 に 会 っ た だ た 。 よ っ 
し ゃ と 相談 を 受け , 次 の 惑星 オー ソニ アヘ へ 
と 私 の 旅 は 始ま る の で あっ た 。 


行き 詰まる と ころ は 画 画 画 

テキ スト , グラ フィ ッ ク を 問わ ず , アド 
ベンチャー ゲー ム の 多く R, 単語 を 入力 す 
る こと に よっ て 進行 し て いき ます 。 つ まり , 
名 詞 (一 を ) 圭 動詞 (一 する ) の 形 で , 日 本 語 
また は 英語 を 入力 し て いく の が 一 般 的 で す 
ね 。 と ころ が これ に は 限度 が あり , 同義 語 
が 使え な い 場 合 が まま ある の で す 。 物 を 取 
9 たい とき, GET で だ めで , TAKE で うけ 
つけ られ だ た り , また , カギ の か け て ある ド 
ア を 開け る と き に 
t, "カギ を つか 
う ^ の で は な て く 。* カ 
ギ を あけ る ” С» 


結局 , アドベンチャー の 極意 ほ と い う も の 
は , 自ら の 推理 に より 純粋 に 未知 な る 謎 を 
解い て いく と ころ に ある の だ か らし て , 同じ 
行動 に 違っ た 言葉 を 選ば な けれ ば いけ な い 
と いう の は 何たる こと か 。 と , つい 怒り の 
声 あ を あげ て し まい まし た が 。 か の 歴代 の 名 
探偵 諸氏 が , 繊細 か つ 大 胆 な 行動 の うち に , 
ここ は カギ を 「 つ か う 」 べ きか 「 あ ける 」 
べき か な ど と 迷っ だ で あり まし ょ うか 。 耕 
で あり ます 。 ポワロ 然 り 。 ホー ムズ 然 り で 
あり , フィ リッ プ ・ マ ー ロ ウ に 至っ て は , š 
あ 形 容 詞 で らい に は 気 を 使っ た か も し れ な 
い が …。 

そう いう 意味 も 含め まし て ,「 ス ター ライ 
ト ア ドド ベンチャー」 は すべ て Yes, No 方 式 
を 採用 し , 行動 する 主人 公 に 指示 あたえ ぇ 
て いく 形 で 謎 解き の み に 専 念 で きる の で す 。 
生き る の 死ぬ も 私 次 第 。 何 度 、 ヒー ロー を 


ШТ し まっ た こと か 。 行き 輔 まる も ころ 
は 理解 の 足り な い 自 分 で ある か ら , か わい 
さあ まっ て も , 憎み きれ な か っ た だ たり し て 。 

PART I は 内容 を 考え て も, 小手 調べ と 
し て 初心 者 の 方 に は うっ て つけ で し ょ 5. 


っ だ りす る の で す 。 
矛盾 を 感じ ます ね 。 
これ に は , メモ リ 
また だ は 作 
者 の vocabulary の 
WWE, 種々 
の 事情 が あい まっ 
t, し か た の な い 
こと が も し 管 ませ 
А 


ж EL 
DFE, 


謎 が 解き か けた と き の ,「 あ っ な る ほど , Z 
う で あっ た か 」 と 感じ る あの 興奮 と 快感 を 
味わっ て いた だ きた い 。 そ うし て より 茸 解 
な アド ベン チャ ー へ と の め り 込 ん で い 〈 の 
で す 。 


新た な る 冒険 に 回 画 較 

私 MM は , FAHM, 右往左往 の の ち , 
マス ター に や っ と 会 えた 。 が , これ が 次 の 
冒険 へ し な る きっ か け に な る と は , 思い も 
よら な か っ だ の で ある 。 

アイ リス に 着い た と た だ たん, тх 5 — 
た れ , シャ ン が 連れ 去ら れ て し まっ た 。 と 
に か 〈 探 し 歩く と する か 。 し ば ら 《 す る と 
包み を 持っ た 男 に 会 い , 包み を くれ だ 。 これ 
を 開け る と …。 し まっ た だ / 


LXE Ty Cy mmm 
謎 を 解い て いく 上 で 必要 な こと に , マッ 
どこ に 何 が 


ピン グ が あり ます 。 これ は , 


あり , 誰が いて 何 を する か を すべ て 書き 入 


れ て いき , どこ で て 死 が 待っ て いる か な ど 間 
違い を 繰り 返さ な いた め に も , ぜひ 作っ て 
お きた いも の で す 。 私 が 独自 に 作っ て いる 
の は , 紙面 に 東西 南北 を 決め , 出発 点 を 中 
心 に 動き まわ る ご と に 自分 の プロ ッ ク を 描 
š, 出来 事 を ブロ ッ ク 内 に 書き 込む と いう 
こと を し て いま す が ,。 これ ば か り は ,。 個人 
の や りや すい よう に マッ ピン グ す る は ほうが, 
お も し ろ い で すね 。 

と ころ が , 時 に は 役に立た な いこ と も あ 
る の で す 。 それ は , プロ グラ ム 内 て で 乱数 が 
使わ れ て いる 場合 で , 毎回 グレイ す る ご と 
に 出 て くる も の , 道 な ど が 違っ て くる か ら 
で す 。 こ れ は , ゲー ム を 難し くす る た め に 
使わ れる 手法 の ひと つ な の で す が , 使い 方 
に よっ て は 目 も あて られ な いも の に な る 迷 
れ も あ り ま す 。 以前, ある アド ベン チャ ー 
C, や は り 乱 数 を 使っ て お り , 怪物 の 出 て 
くる 場所 や ,. ラッ ク に 入っ て いる 道具 な ど 
が その つと 違っ て 出 て くる の で , iot 
死に まく る と いう の が あり まし た が , これ 
は 仲間 うち で も ひん し ゅ く を 買っ て お り ま 
Жу” 

と ころ で, PART II で は 一 部 分 だ け 乱 数 
を 使っ て な お り , こ れ な ど は 成功 し て いる ほう 
で は な いで し ょ うか 。 考 えて みれ ば , いつ も 
同じ 場所 に 同人 物 が いる わけ は な 〈, ちょ 
っ と 軽薄 な 男 が うろ つき まわ っ て いて も 何 
ら 不思議 は な い の で す 。 ま あ , ゲー ム の 性 


NL, すさ て が そう で は こま り ま す が …。 
彼 の 出 方 に よっ て , ゲー ム の 進め 方 を 臨 
機 応変 に 講ず る の も 楽し いも の で す 。 だ か 
ら と いう わけ で も あり ませ ん が ,PART ІС 
比べ PART II は や や 難度 が 増し て いる よう で 
+, 同じ く 入 力 は , Yes, No, 方 式 を 取っ て 
お り , 人 物 の 出 方 , 消え 方 な ど は よく 考え ぇ 


ой, 続け て アド ベン チャ ー を 解い て いく 
СЕ, 良い も の で し ょ う 。 

PART II か ら で も ゲー ム は で きま す が , や 
は 0PART1I を 解い て か ら 挑 戦 し た ほう が , 
より 楽し め る と 思い ます 。PART І, Ú t $ 
に X1 用 , MZ-2200/2000 用 が 発売 きれ て ま 


LT, グラフィック の 点 で は , X1 MZ-22 
00 は さる ほど 違い は あり ませ ん 。 が , お も し みろ 
い の は MZ-2200 で , PSG は , 1 音 し か 出 な 
い は ず が ,。 メロ ディ ー が 和音 に 聞こ えて く 
る の は すご い 。 一聴 の 価値 は あり ます よ 。 


£š BU $U Tomas 

な ん と 包み は 爆弾 で あっ た か 。 同じ し く 
じ り を し な いよ うに 歩き まわ っ た だ た あげく, 
出発 点 に も どっ て みる と , ここ は 宇宙 空港 。 
Ai SAL, 謎 の 第 9 惑星 RANDON に 飛び た 
つと ころ で あっ た 。 ま だ まだ 根 は あげ られ 
な いや ぜ 。 (三宅 流 衣子 ) 
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— 黄金 の 墓 


X1/C/D 


野趣 あふ れる グラ 71% vi 


КФО, スト ラット フォ ー ド C.C. 
C. が 主催 し た 第 1 回 アド ベン チャ ー ゲ ー ム 
・ コ ユ コンテス ト に お ける 最 優秀 賞 受賞 作品 で 
ある 。 制作 者 は , 井上 潤 さ ん と 大 浦 由貴 る 
ん で , オリ ジ ナ ル は PC-6001。 本 誌 で は 昨 
年 10 月 号 に お いて , 同 コ ン テ ス ト 優 秀 賞 受 
賞 作品 し な っ た 「 ピ ラミ ッ ド の 謎 」 を カラ 
ー 画 面 紹介 し , 好評 を 得 て い る が , この と 
き の 最 優秀 賞 で ある 「 黄 金 の 幕 」 が X1 に も 
移植 きれ , アド ベン チャ ー ゲ ー ム ファ ン に 
は いっ そう の 興奮 が 期待 びき る は ず だ 。 


砂漠 を さま よい 画 画 画 

砂漠 の 謎 は , 真夜 中 に 一 枚 の 手紙 が 舞い 
こん だ こと が から 始ま る 。 

PRU グ ク なお う を し っ て いる j。 
手紙 に は こう 書か れ て いた の だ 。 

「 じ つ は ク グフ お う は いき て いた だ の だ 。 

そし て わ だ し に タダ カラ の あり か を 

お し えて くれ だ 。 LP ereere Т 
そし て 私 は , 焼け つく よう な エジプト の 砂 
漠 に 立っ て いた の だ 。 

る て ゲー ム を 進め る に は , “一 を 見 る ” 
Зер” と いう よう に 動詞 と 名 詞 を 組み 
あわ せ て , ひら が な で 入力 すれ ば よく , A 
ター ト 時 に は , 150 の パワ リー と 150 の 水 , 2 


あお いと くだ" < 
ENTER=> +> 
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pes А 


アー 


れ に 100 の お 人 金 を 持っ て 
いる 。 フ パワ ー と 水 は 移 
動 す る ご と に 減っ て い 
з, 20 以 下 に な る と 力 
つき て 死ん で し まう の 
Т, あま りう みう あと 
し て いる わけ に は いか 
な い 。 と くに 水 は 8 砂漠 
に お いて は 大 切 で , と 
き に は お 金 の 代わ り に 
水 を 要求 きれ る こと も 
ある 。 な ん と か し て 補給 し て お く こ と が 肝 
心 だ 。 クフ王 の 宝 を 見 つけ る まで に は 長い 
道のり が ある の だ 。 

砂漠 を きま よっ て いる と , 謎 めい た 人 物 
が 次 々 に 登場 する 。 す べ て を 見 通し た よう 
に 語り か け て 〈 る 古 師 , 正体 不明 の 男 ロ イ 
ド 。 い ずれ も 謎 を 解く カギ と な る 重要 な キ 
ャ ラク ター で ある 。 な か で も オア シス に 住 
む 美 し い 女性 ネイ ト は , 唯一 の 女性 キャ ラ 
C, 疲れ きっ た 冒険 者 に と っ て 悩ま し くも 
魅力 的 で ある 。 た だ し 女性 に 対し て は あく 
まで も 優し て し な いよ うり …… * 

何 度 も 何 度 $ 殺 る れ な が ら , 各地 点 を 〈 
まな 調べ て いく うち に , 全体 の つなが り 
が わか っ て くる は ず で ある が , それ で も ま 
だ まだ 納得 の いか な い 
不可 解 な こと は 多い 。 
アド ベン チャ ー で は 地 
図 を 描い て 進む の が 定 
石 で ある が , ここ で は 
その 地図 まで が , 描き 
上 げ る に つれ ミス テリ 
アス な も の に な っ て い 
(o 歩き 過ぎ て 方 向 感 
覚 ま で 狂わ る れ て し ま 
うと いう 設定 な の だ ろ 


سه 


あな た は いま 、 も し ゃ くも つの ざさ は いく に いる s 
ENTER=> 


う か 2) 。 

こう し て , と に も か くに も 私 の 前 に 現 わ 
れ だ た の は , エジプト も の と は 思え な い 得 体 
の 知れ な い 建 造物 で あっ た の だ ?。 


ミス テリ アス な 要素 が 一 男 較 
「 黄 金 の 墓 」 は ピラ ミッ ド や スフィンクス 
と いっ た 冒険 必 を か きた て る エジプト を 舞 
台 に 展開 し , ミス テリ アス な 要素 が いっ ぱ 
ぃ だ 。 特 筆 に 値する の は , アッ プル 風 と も 
言え る 独特 の グラ フィ ッ ク 画 面 で ある 。 け 
っ し て PC-6001 か ら の 移植 だ か ら あ らい の 
で は な い 。 い わ ゆ る アニ メ の セル 画 の よう 
な 絵 と は 根本 的 に 異な り , 異国 情緒 を 感じ 
る せる 見 事 な 出 来 ば え だ 。 
問題 点 い むしろ ス トー リー に あり , FA 
理 に 思わ れる こと や , 脈絡 の な い 展 開 も 平 
気 で 起 る っ て し まう 。 だ た だ し メッ セー ジ は 
いい か げん な も の も 楽し い が 。 (斎藤 P) 
注 ) 
1) や は り 女 性 を く (どく の に あせ っ て は いけ 
な い 。 私 の 場合 、 な ぜ か 何 度 も 浮気 を し 
て 彼女 に 殺さ れ て し まっ た 。 
2 ) 善意 に 解釈 し て いる の だ が …。 
3) クフ王 の 宝 の 謎 を ム り や り 解 いて し まう 
カギ が ここ に ある の だ 。 
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魔王 と の 闘い に 備え て 


聖なる 剣 は 魔王 に S ら われ た お ゎ お姫様 を 救 
出す る た め に , 魔王 の 洞窟 へ 乗り 込ん で い 
く ひ と り の 剣士 の 物語 で す 。 ゲ ー ム の 開始 
時 点 で は 剣士 (あな だ) は 武器 を 何 も 持 た ず 
魔王 の 洞窟 の 前 に 立っ て いま す 。 や が て 来 
る べき 魔王 と の 対決 に 備え て , あな た は 何 
を し な けれ ば な ら な い の で し ょ うか 。 な お, 
この 聖なる 剣 は 絵 の 無 い テ キス ト 和 形式 の ア 
ド ペ ンチ ャ ー ゲ ー ム で すか ら , 自分 の 周囲 
に は 何 が ある か 常に 注意 し て お く 必 要 が あ 
bid. 

まず 最初 に 行き つく て の が ドラ ゴン の いる 
広間 で す 。 こ の と き , 早く も 最初 の 難関 に 
突き 当たっ て し まい ます 。 こ の ドラ ゴン を ど 
うに か し な いこ と に は , 広間 の 他 の 場所 へ 
行く こと すら 5 で きま せん 。 鎖 に つなが れ て 
いる か ら と いっ て 移動 し よう と し て , ドラ 
ゴン の ツメ に か か っ て あっ と いう 間 に 死 ん 
で し まっ た だ 人 も 多い の で は な いか と 思い ま 
す 。 ド ラゴン を 何と か し た 後 は , 武器 ( 特 
CR) を 探る き ね ば な り ま せん 。 こ の た め に 
は , か つて 魔王 に 倒さ きれ た 戦士 の メモ が 重 
要 な ヒン ト に な り ま す 。 こ の メモ を 読ま な 
けれ ば , それ が あま り に 突飛 な こと な の で 
剣 を 手 に 入れ る こと は まず 不可 能 で し ょ う 。 
この メモ が どこ に ある か は , ちょ っ と 教え 
られ ませ ん が , 次 の よう な こし と は 言え ます 。 
棚 や 箱 の 中 か ら あ る 物 を 取っ た と し て も , 
後に は 何 も 無 いな ど と は 思わ な いこ と 。 


ドラ ゴン の いる 広間 か らい ろ い ろ な 部屋 
に 行く こと が で きま す が , 多 〈 の 小道 具 を 
手 に 入れ る こと が で きる 割 に は , 誰 と も 出 
会 うこ と が で きま せん 。 こ れ で は 何 も 解 決 
し な いで は な いか と 思っ て いる と , 意外 や 
意外 , 地下 室 に 通じ る 秘密 の 通路 を 見 つけ 
る こと に な る の で す 。 そして, この ゲー ム 
の 本 当 の 面白 き は , この 地下 室 へ 降り て き 
て か ら に ある と 言う こと が で きま す 。 ЕС 
DT, 地下 室 を 移動 する に は , ラン プ が 必 
要 で す 。 こ の 時 点 ま で に , 277, i Ж 
打ち 石 は 見 つけ て お きま し ょ う (私 は 油 を 
探す の に 苦労 し て し まっ た )。 

地下 室 び は いろ いろ な 怪物 と の 出会い が 
待っ て いま す 。 こ の と き , それ まで に 集め た 
小道 具 を うま く 使 っ て 怪物 か ら 逃 げ 出さ な 
けれ ば な り ま せん 。 しかも, 5 回 の 命令 以 
内 に , と いう 条件 が 付い て いま す 。 これ は 
結構 きつ い 制 限 で , も た も た し て 殺 る れ て 
し まう と いう こと も 多々 あり ます 。 こ うい 
う 状況 は , 血 に 人 錠 え た ドラ デ ゴン, 食肉 植物 , 
殺人 バチ , ミノ タウ ロス , 吸血 鬼 , E7, 
еже, ひと 部 屋 進む ご と に や っ て きま 


す 。 こ れ は , も う ス リル の 連続 で , 手 に 汗 
握る 展開 で す 。 それ ら の 難関 を 切り 抜け , 

^ot, 目指 す 魔 王 の 部 屋 へ と 出る こと が 
で きま す 。 そして, 最後 の 難関 魔王 直属 
の 部 下 , 黒 騎士 と の 対決 が 待っ て いる の で 
す 。 それ に 勝利 する と , あな た は お 姫 様 に 
会 うこ と が で きま す 。 しかし, sihi, 

魔王 の 魔法 で ビン の 中 に 閉じ 込め られ て い 
ます か ら , どこ か に 隠れ て いる 魔王 を 探し 
だ し て , それ を 打ち 破 ら ね ば な り ま せん 。 

魔王 ほ と の 一 騎 打 ち も ち に際し て どう し て も 必要 
хо», この ゲー ム の タイ トル で ある 聖 な 
る 剣 で す 。 し た が っ て , それ まで に 聖なる 
剣 を 手 に 入れ て いな けれ ば な り ま せん が, 

これ は か な り の 難問 で し ょ う 。 biz», 

魔王 と の 対決 で 聖なる 剣 を 使う まで は いい 
の で す が , その 先 が ち ょ っ と わか り ま せん 。 


ここ で も 5 回 の 命令 の うち に 魔王 を 倒さ な 
けれ ば な ら な い の で す が 。 か な り 苦 労 する 
こと に な り ま す 。 しかし, ゲーム 開 始 時 の 
メッ セー ジ を よく 思い 出す こと で , 見 事 に 
魔王 を 打ち 倒し , ハッ ピー エン ド を 迎え る 
(清水 和 人 ) 


こと が で きま す 。 
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mm ドイ ポス PartI 脱出 


X1/C,MZ-700 


宇宙 船 は 故障 し て いた 


俺 の 名 は ジョ ー グ 。 こ の 宇宙 の どこ か に 
いる ポイ ボス 七 聖人 の ひと り だ 。 今 は , F 
和 軍船 で ピュ ロス 人 号 の 機関 士 を し な が ら , Ж 
ざか っ て いく クラ ー ネ 星 を 眺め て いる 。 俺 
達 の 母 な る 星 ボ イボ ス は クラ ー ネ 星 の 手 に 
よっ て 宇宙 か ら 消 減 し て し まっ た 。 ЖЫ 
れ た 故郷 を 再建 する た め の 旅 , 第 二 の ポ イ 
ボス と な る べき 惑星 を 探す 旅 が 今 始 まっ た 
の だ 。 

し か し , 思え ば 大 き な 代 償 だ っ た 。 俺 達 
の クラ ー ネ 星 脱出 の た め に 多く の 仲間 の 命 
を 戦 渦 の 中 に 散ら せ て し まっ た 。 ヒ ャ ア ・ 
エエ ジ ぶ テツ ノスケ 。 グー リン 。 ヨ カ カ ー ン 、 
コシ ー ナ , 君達 の 尊い 犠牲 は 決っ し て 無駄 
に し な い 。 

リュ キア , ミネ ル , 君達 も どう や ら ポ イ 
ボス 七 聖 人 の ひと りら し い 。 お 互い に 力 を 
合わ せ て 残る 四 人 を 探し 出し , 一 日 も 早く 
第 二 の ポ イボ ス を 見 つけ よ う 。 

ゲー ム が 終わ っ て か ら , 思 わ ず こ うつ ぶ や 
いて し まい まし だ 。 それ ほど まで に 主人 公 に 
対す る 感情 移入 を る きせ て くれ る の が , この 
ロー ルプ レイ ング と いう も の な の で し ょ う 
b. とにかく , ゲー ム を 開始 し た ば か り の 
ころ は , 戦闘 の 仕方 な ど 要領 が な か な か つか ヵ 
D, な ん で こん な も の が 面白 い の だ ろう , 
と いう 感じ も し まし た が , 数 時 間 も 遊 び つ 
づけ る と , も う 夢 中 に な っ て 途中 で 止め る 
こと が で き な (《 な る ゲー ム が , この ポイ ボ 
ス Part I で す 。 

物語 の 発端 は , 消 減 し た ポイ ボス 星 か ら 
か ろう じ て 脱 出し た 人 々 が 捕え られ て いる 
クラ ー ネ 星 の 収容 所 の ひと つ , ジル ダ = 3 
で す 。 主 人 公 ジ ョ ー グ は この 場所 か ら , 5 
は まだ どこ に いる か わか ら な い , ポイ ボス 
七 聖人 や クラ ー ネ 星 脱出 を 手助け し て くれ 
る は ず の 仲間 を 求め て .。 2>-Ан 00018 
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する こと に な る の で す 。 ジョ ー グ の 行く 手 
に は 様々 な 敵 が 待ち 構え て いま す 。 民間 人 , 
ERE, ожо һ, RL, 機甲 兵士 な どの 
攻撃 を 回 避 し な が ら , ある い は 彼ら と 戦闘 
し な が ら , 仲間 を 増やし て いか ね ば な ら な 
voci. 


この ゲー ム の 特徴 と し て , 登場 人 物 の 多 
和 彩 き が あげ られ ます 。 な に し ろ 10 種 類 の 異 
な る 星 の 人 々 が 登場 する と いう の で すか ら , 
ある 人 物 に 出会う ご と に マニ ュ ア ル の 説明 を 
ЖАС, この 人 種 は こう いう 性 格 を 持っ て 
いる の か , な ど と 考え ん ながら ゲ ー ム を 進め 
て いけ ば 面白 きる が 倍増 する に 違い あり ませ 
ん 。 私 の 場合 は 、 ゲ ー ム を 終了 する まで に 
23 人 の 人 物 と 出会う こと が で きま し た 。 実 


際 に は いっ た い 何 人 に 会 うこ と が 可能 な の 
で し ょ うか 。 人 に 出会う と, その 人 を 仲間 
に する か どう か が 問題 し な り ま す 。 敵 と 戦 
うに は 仲間 が 多い ほう が よい の で す が , や み 
くも に 会 う 和 人 すべ て を 仲間 に し て いく と, + 
ひど いし っ ぺ ぷ 返 し を 受け る こと も あり ます 。 
た と えば ある 人 物 を 仲間 に する と , 全員 の 
武器 を 持っ て 逃げ られ て し まい ます 。 ま た ., 
結局 は こち ら を 裏切っ て し まう の で す が , 
強力 な 武器 を 持っ て 来 て て れる 人 も いま す 。 
こう いう 人 に 対し て は , 仲間 に 入れ た 後 , 
すぐ で さる ま 武 器 配 分 を 行なっ て , その 武器 を 
自分 の も の と し て お け ば よい で し ょ Э, 

と ころ で , ゲー ム の マニ ュ ア ル に 付い て 
いる クラ ー ネ 星 帝都 市 マッ プ は か な り い い 
か げん で す 。 私 は , アド ベン チャ ー ゲ ー ム 
の 癖 で 正確 な 地図 や 作っ て み ま し た が , こ 
うい う 作 業 も この ゲー ム の 楽し み の ひ と つ 
で し ょ う 。 もっとも, 舞台 の すみ ずみ まで 
隈 無く 行こ うと 思う と , それ まで に 何 度 か 
死な な けれ ば な り ま せん 。 た と えば , エネ 
ルギー プラ ント の 辺 緑地 へ 行く と 熱 射 病 で 
死ん で し まい ます し , 廃液 湖 の 側 で は 廃液 
ガス 中 毒 に か か っ だ り も し ます 。 


ERE: 4, 

し か し , この ゲー ム の 最大 の 面白 き は 
と の 戦闘 に ある と 言え ます 。 敵 が 迫っ て 来 
た 場合 , 戦う べき か 逃げ る べき か , と いう 
の が 最初 の 問題 で す 。 機 甲兵 士 や オー ガ ノ 
イド を 相手 に する 場合 , 逃げ 出す 時 期 を 誤 
5L, どこ まで も 追い か け て こら れ て , Ж 
後に は 全 減 し と いう こと に も な りか ね ませ ん 。 
敵 と 戦う と き は , 味方 と 敵 の 戦力 の 分 析 が 
重要 に な り ま す 。 こ の 戦力 分 析 と いう の は , 
1 か ら 4 の レベル が あり ます 。 こ の レベ ル 
iz, 今 ま で に どれ だ けり 戦闘 を し て きだ た か と 
いう 経験 に よっ て 決定 され る も の で す 。 レ 
ベル 1 や レベ ル 2 で は 正確 な 分 析 は で きま 
せん が, レベ ル 3 。 レベ ル 4 に な る と 敵 や 
味方 の 真 の 戦力 が わか り ま すか ら , 確実 な 
攻撃 を する こと が で きま す 。 この 点 で 面白 
い ぃ の は , 出 会 っ た と き の 敵 の 戦力 が , 味方 の 
戦力 を 上 まわ っ て いて も , 戦闘 中 に 逆転 す 
る こと が ある と いう こと で す 。 ポ イン ト は , 
敵 の リー ダー を 1 回 目 の 攻 撃 で や っ つけ る 
と いう こと で し ょ う 。 い くら 敵 の 力 が 強大 
と いっ て も , こち ら の 体力 が 十分 残っ て い 


к 


ni, 1 回 で らい 攻撃 る され て も 死ぬ も の で 
は あり ませ ん 。 か な り の 強敵 と 言わ れ て い 
る クラ ー ネ 軍 の 兵士 の 6 人 部 隊 な ど を うま 
《 撃破 し た と き は 快感 その も る の で し た 。 
この ゲー ム に お いて , 大 き な 戦 闘 は , ナ 
ネー 海軍 基地 で の 戦闘 p ク ラノ し レ 主 都 園 で 
の 戦闘 で し ょ う 。 こ の ふた だ つの 地区 に は と 
て も 重要 な 人 物 が いま すか ら , ゲー ム を 終わ 
ら せ る ため に は 避け て は 通れ な い 道 に な っ 
て いま す 。 当然, そこ で の 戦闘 に 勝利 し な 
いこ と に は 目的 の 人 物 に 出会う こと は で き 
ませ ん 。 しかし, そこ の 警護 の 厳し いこ と 
と いっ た だ たら, 他 の 地域 の 比 で は あり ませ ん 。 
BELA, オー ガ が ガ ノイド, 小隊 , 兵士 , H 
甲兵 士 と いっ た 連中 が ウジ ャ ウジ ャ いる の 
で すか ら 。 こ の だ た め , それ まで に 強力 な 武 
旭 と 体力 を 十分 蓄え て お いて 決戦 に 臨 まな 
けれ ば な ら な い の で す 。 それ も , 絶対 に か 
な わな い 相 手 な ら 逃 げ ば なく て は な り ま せん 。 
無駄 な 戦闘 を し て 武器 の エネ ルギー を 減少 
る せる こと は で き な い か ら 6 です 。 しかし, 
何と か 勝て そう だ と いう 敵 に 対し て は 果敢 


= > үт 
に 攻撃 を 仕掛 け ま し ょ う 。 戦 闘 中 に 仲間 が 
CED, まだ ひとり と 死ん で いく こと も あ 
り ま す が , ポイ ボス 人 が 殺さ る れ な い 限 り は 
戦い 続け る こと が で きる で し ょ う 。 ポ イボ 
ス 復 興 の た め に , 多少 の 犠牲 は や む を 得 な 
い の で す 。 
クラ イマ ックス の 戦闘 が 終わ る と , 脱出 用 
宇宙 船 の 隠 る され て いる 場所 が わか る よう に 
な っ て いま す 。 ここ で ゲー ム は 一 直線 に 終 
結 へ … と 思っ た の で す が , そ う 簡 単に は 終わ 
り ま せん 。 宇宙 船 は 故障 し て いる の で す 。 
そこ で , 敵 の 攻撃 を か わし な が ら , 宇宙 船 
を 修理 する こと に な り ま す 。 せ っ か く 〈 く 直り 
か けた 宇宙 船 が , 敵 の 攻撃 で 被弾 し , 修理 
に か か る 日 数 が 増え て し まう こと も あり ま 
すか ら 注 意 し まし ょ う 。 
そし て , めで た だ く 修 理 が 終わ る と , パイ 
ロッ ト と 機関 士 を 決め て 宇宙 船 の 発進 で す 。 
この と き , 長かっ た 脱出 へ の 物語 は 終わ り 
Part II へ 向け て の 新た な 旅立ち が 始ま る の 
で す 。Part II で は どの よう な 試練 が 待ち 5 
け て いる の で し ょ うか …… 。 (清水 和 人 ) 
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ーー 一 ソフ ト ハ ウス 殺人 事件 


MZ-2200/2000 


この 「 ソ フト ハウ ス 和 殺人 事件 」 は 「 コ ス 
モク ロス 」「 聖 な る 剣 」 C3 BIO 07 7 
タル ソフ ト ょ より 4 月 21 日 発売 予定 と いう , 
で きた て の アド ベン チャ ー で す 。 


6922R4GHT(⑥)J984 


Time 10:04 


3534 ) 299% 93 1722 491, 4549. 
І:һ...2202 オリ ナラ RUAS 447° 


ENTER COMMAND >e 


LATX ソ フト と いう ソフ ト ハ ウス で 起き 
た 殺人 事件 を , あな た が 探偵 クマ ダ に な っ 
て 解明 し て いと いう 設定 で す 。 

や は りこ うい う 事 件 の 捜査 は 聞き 込み が 
基本 。 ソ フト ハウ ス を 中 心 と し て , 現場 付 
近 を 歩き 回 り , 登場 する 6 人 の 人 物 た ち に 
話 を 聞い て 回 ら な けれ ば な り ま せん 。 とり 
あえ ぇ え ず は LATX ソ フト に 行っ て 現場 を 見 せ 
て も ら お う , と 思っ て 入り まし た が , 最初 
の 登場 人 物 で ある 社長 , 勝手 に 動 こ うと す 
る と 怒り , な ぜ ヵ 現場 に 通し て くれ ませ ん 。 
うー やむ , 話 の も っ て いき 方 が 悪かっ た の か 
Ж, と いう わけ で , も う 1 度 社長 と じ っ く 
り 話し て みる こと に し ます 。 

と いう 具合 い の , 聞き 込み 中 心 の アド ベ 
ンチ ャ ー ゲ ー ム で す が 。 これ も アド ベン チ 
ャ ー ゲ ー ム の 鉄則 に も れず , 取る も の は す 
べ て 取る , 聞け る こと は すべ て 聞く 方 式 で 
いっ て 間違い な る そう で す 。 た だ た だし, や っ 
て いて わか っ て きた の で す が , 最初 聞い た 
と き に は 「 知 ら な いよ 」 な ど と 言っ て いて 
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調書 の 作成 が カギ で す 


b, 他 の 人 へ の 聞き 込み に よる 捜査 の 進展 
に よっ て は , 次 に 同じ 質問 を し た と き の 答 
ぇ が 違っ て くる こと が あり ます 。 よ ー く 推 
理 し な が ら , 再度 質問 を 繰り 返す の が この 
ゲー ム の コツ と いえ を 
う で す 。 し か し , 都合 
の 悪い こと を 聞か れる 
と 雲 が くれ し て し まう 
人 も いま すか ら , 聞き 
方 に は 十分 注意 し まし 
1 

ST, 入力 方 法 は カ 
FANT, 慣れ な いう 
ち は ち ょ っ と 戸惑い ま 
し た 。 まあ, 制限 時 間 
に 近づく ころ に は か な 
b 慣れ る も の で す 。 ま た , 入力 で きる コマ 
ンド は すべ て 公開 る きれ て お り , 隠し コマ ン 
ド は 一 切 あ り ま せん 。 

画面 処理 の スピ ー ド も 結構 速く , 
そ を 少な いも の の , それ 
な り に 工夫 る れ て いる 
よう て す 。 

よく ある アド ベン チ 
ャ ー ゲ ー ム の よう に , 
何 か 行 動 す る と 突然 殺 
され て し まっ た り , ЖЕ 
ん だ り と いう よう な こ 
と は あり ませ ん 。 が , 
時 間 制 限 が あり ます 。 5925 
朝 の 10 時 に 捜査 を 始め Ч 
て 夕方 の 6 時 ぐら いま 
で が リミット の 時 間 で , 行動 を ひと つ 超 こ 
+, また は 聞く ご と に 2 分 が 経過 し ます 。 
「 な ん だ 240 回 も 入力 どき る じゃ な いか 」 な 
と ど と 甘く みて は いけ ませ ん よ 。 私 も この 事 
件 の 犯人 を 見 つけ 出す まで に , 3 回 も 時 間 


面 数 こ 
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ォ オー バー し て し まい , 犯人 に 人 逃げ られ て し 
まっ た の で すか ら 。 と に か ぐ ,。 あま り 無 駄 
な 行動 , 質問 を 繰り 返し て いる と , あっ と 
いう 間 に 6 時 を まわ っ て し まい ます 。 
この ゲー ム , 殺人 事件 と いう 名 に 恥じ ず , 
推理 を 十分 働か め せ られ る よう 工夫 る れ て い 
る 点 は 見 事 で す 。 あ る も の を 手 に 入れ る た 
め に 満た し て いな けれ ば な ら な い 条 件 , と 
いう アド ベン チャ ー ゲ ー ム の 定石 を うま く 
利用 し て スト ー リ ー を 組み 立て て いる と こ 
5b, 推理 ゲー ム と し て 十分 な 手応え が あ 
が た いろ て よい で じゃ う 。 

最後 に , 移動 型 ア ド ベ ンチ ャ ー で , £ Ç Hh 
図 を 描い て 自分 の 位置 を 明確 に する よう に , 
この ゲー ム で は それ ぞ れ の 登場 人 物 ご と. 
ある い は 時 間 ご と に , 自分 な り の 調書 , А 
モ を 作っ て いく と, の ちの ちの 推理 の 参考 
に な る で し ょ う 。 画面 上 どけ で な 〈, ЖО 
上 で 考え る こと で よい 結果 が 得 ら れ そ う で 
Fa 
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この タイ プ の ゲー ム , 1 回 解い て し まう 
と 犯人 が わか っ て し まっ て お も し ろく な く 
な る も の で す が 。 2 回 め 以降 は いか に 早い 
時 間 に 解 決 び どき る か を 試し て みる と いう の 
も 楽し い の で は な いか な ? (谷川 展 子 ) 


南 太平 洋 ア ド ベ ンチ ャ ー 


XI/C 


持ち 物 に 制約 は あり ませ ん 


グラ フィ ッ ク が さらに, 細か に , そ し て カ 
ラー が 常識 と な っ た 今 。 パ ソコ ュ コン は ワン ダ 
ー ラ ンド と な っ た だ 。 い くら 計算 機 し は いえ 
ゲー ム の で き な い マシ ン な ん て つま ら な い 
も ん ね 。 大 型 計算 機 の 上 で さえ ぇ , 端末 を 操 
作 し て スタ ー ト レッ ク な ど キ ャ ラク タゲ ー 
ム で 遊ぶ こと も ある 。 グラフィック も で き 
な いし , TSS 処理 だ から 反 射 神経 型 は まず 
無理 。 つ まり 思考 型 の も の し か で き な い 。 
大 型 計算 機 は 処理 が 早い っ て いう けど 小 回 
り が きか な いか られ ね 。 


その 点 パ ソコ ン は すご い 。 す き な 時 に 好 
き な も の を 遊ぶ こと が で きる 。 し か も ラン 
ニン グ ユ スト は タダ 。 今 プ ゲー ム の アド ベン 
チャ ー ゲ ー ム , 一 昨年 の MYSTERY HO 
USE に 始ま っ て , T&E の メ フ ィ ウ ス , で 現 
在 の 戦国 時 代 と な っ た 。 毎 月 発売 きれ る 雑 
誌 に 数 多く の 広告 が 掲載 きれ て いる が , 画 
面 の 美しき は 新しく 発表 きれ る ほど 良い 。 
専門 の デザ イナ ー が デザ イン する も の も あ 
る と いう か ら 和 驚き だ 。 

私 は ミス テリ ー ハ ウス (マイ クロ キャ ビ 
>) の ころ か ら ア ド ベ ンチ ャ ー ゲ ー ム に 熱 
中 し た 。 連日 数 時 間 ず つ ナ ヅ 解 き を 楽し ん 
だ 。 そ の 後 パ ー ト 2 に 裏切ら れ た だ め に ( あ 


ん な の ゲー ム と は 言わ ん ) それ 以来 遠 ざ か 
っ て いた の だ が 。 今度 久々 に アド ベン チャ 
ー ゲ ー ム に 挑戦 する こと に な っ だ た の で ある 。 

ヤッ パ 。 わ くわ くす る ね , パッ ケー ジ を 
開く 瞬間 っ て いう の は 。 開け て ぴっ くり, 
dB-BASIC で 走る と ある 。 バー ジョ ン の 指 
定 は 特に な いみ た い 。 そこ で 古い も の より 
は , と いう こと で 最新 の 1.2 を 起動 する ( テ 
ー プ は 遅い な あ ! )。 続 いて ゲー ム プ ログ ラ 
ム を ロー ド 。 ナニ? コン パイ ラ し て も 動か 
理由 は 簡単 。 ア ログ ラム を 分 割 ロ ー 
ド し, 一 部 (多分 デー 
タ だ と 思う ) が マシ ン 
語 の た ゅ 。BASIC の リ 
スト も 何ら 手 を 加え ら 
れ て いな い の で , その 
まま 見 れ だ (でも, 先 を 
見 て し まう し 答え が わ 
か っ ちゃ うか ら グ ッ と 
こら えて ネ )。 

会 話 は カナ 入力 。 ち 
と や さる し いよ うに 思え ま 
し ょ う が , そん な 世 の 
中 甘く な い 。 マ ニュ アル を 見 て も 何 ひと つ 
キー ワー ド が な いか ら ね 。 唯一 の た より は 
ファ ンク ショ ン キ ー の 
み 。 メ チャ クチ ャ に 押 
し て 見 れ ば 何と か な る 
も の 。 あ っ そう そう, 
スト ー リ ー を 書く の を 
忘れ て た 。 ゲ ー ム 自体 
の 物語 を 全編 と 考え た 
場合 , 序章 っ て いう と 
ころ か な 。 つま 9. UC 
LA の 学生 が ミク ロ ネ シ 
アァ へ 隠し 財産 を 捜し に 
行こ うと , お ば の 遺産 


gv? 


を すべ て 処分 し , 飛行 艇 を チャ ー タ ー, パ 
イロ ッ ト と 共に 出発 する が , 嵐 に お そ わ れ 
不時着 , 遠のい て いく 意識 の 中 で 飛行 艇 の 
爆発 音 を 開き ,。 パイ ロッ ト の いな いこ と に 
気づか な いま ま 気 を 失っ た 一 一 。 

ゲー ム 開 始 時 は 彼 が 気がつい た と きか ら 
に な る 。 目 の 前 に は 鳥 が あり , 何だ か 鳥かご , 
ナイ フ , ロー プ が ある 。 何 か 役 に 立つ だ ろ 
うと 思い すべ て ひろ っ て 次 の 島 へ 。 方向 別 
に 6 つの 中 か ら 選 択 で きる けど 最初 は 1 だ 
け み た い 。 後 で 何 か 支 障 が 生 じ る だ ろう け 
E, 数 個 と いう 持ち 物 の 制約 が な い の は 不 
思 議 。 こ ん な に 持っ て よく 歩行 どき る な あ 。 

この ゲー ム を する 上 で も っ と も 重要 な こ 
と は 出 て くる キャ ラク タ に 対し むず か し く 考 
えな いこ と 。 神前 の お を そなえ な ん か に 手 を 触 
れ よ う も の な ら 即 ゲー ム オ ー バ ー。 ゲー ム の 
難易 度 は 初 一 中 級 。 気 軽 に 楽し め る も の で , 
1 時 間 も あ れ ば クリ ア が 可能 。 キ ャ ラク タ 
は あま り 美 し いと は いえ な い 。 容 に 落ち た 
と き 底 に ある 物 が 何だ か 理解 で き な か っ た 。 
メッ セー ジ で 表示 する な り し な いと 致命 的 。 
1 コマ ンド ご と 1 面 描 き な お す の は イラ イ 
ラ す る 。 これ は 部 分 で 処理 し な か っ た の だ 
ろう か 。 (松崎 TÉ) 
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ХІ/С, MZ-700, MZ-1200/K/C 


第 1 話 フ ァ ラ ス 星 の 危機 


「 清 水 和 人 」 氏 の 助け を 借り て 


MZ-700 用 と し て す で 
に 有名 な アド ベン チャ 
ー ゲ ー ム 「 タ イム シー 
クレ ッ ト 」 が MZ-80K 
/C/1200, X1 用 に 移植 
る され 販 売る され る こと と 
な りさ し 

最近 は ソフ ト の 出 が 
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Command ~--Е?° シ 


め っ ぱ う 少 な く な っ た 
MZ-80K /C/1200 ユ ー 


ヘ ペ ンチ ДУМ" L^" 7" 7M. 
ок. 
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ザー に と っ て , 涙 が 出 
る ほど うれ し いこ と で は な いで すか (な に 
を か くそ うこ の 私 も MZ-80K の ユー ザー な 
DTT). 

「 タ イム シー クレ ッ ト 」 と いえ ば , 今年 の 
3 月 号 THE SOFTOUCH で 紹介 きれ て い 
ます が , その 素晴らし る は 確か に 書か れ て 
いる と お り で す 。 

MZ-700 用 と MZ-80K/C/1200 用 と は どこ 
が 異な る か ? と いう と ハー ド 的 に は まず 
カラ ー が 出 な いこ と 。 エ レベ ー タ で 下 に 降 
り る と き の ラ イト の 点 減 と か , エメ ラル ド 
な どの 表現 が いま ひと つ パ ッ と し な い の が 
残念 で す 。 それ か らら ファンクション キー が 
あり ませ ん が , 右側 の テン キー(? ) の 部 分 
で 代用 し て いる の で 問題 あり ませ ん 。 

また, X1 用 で は る す が に グラ フィ ッ ク が 
きれ い に 使 われ て お り , タイ ム マ シン な ど 
各所 で 見 ご た ぇ 十分 で す 。 た だ , 音響 効果 
は , な ぜ か MZ-700 の ほう が 良い よう な 気 も 
し ます が (写真 は X 1 用 )。 

ゲー ム の 内 容 は ほぼ MZ-700 用 と 同じ で す 
が 。 ざく 一 部 (た と えば ロッ ク ナ ン バー) が 
違っ て いる よう で す 。 

この アド ベン チャ ー ゲ ー ム を 行なう に あ 
だ た っ て は , すでに MZ-700 用 の 「 タ イム シー 
クレ ッ ト 」 を 解い た と いう 超人 的 な 人 物 , 


86 отм 1984.5. 


清水 和 人 氏 の 助け を 借り まし た 。 と いう よ 
0, 私 は 彼 の 言う と お り に キー を 押し , Z 
の 手順 を 紙 に 書き 留め て いっ た だ け な の で 
す 。 

それ で も , 1 時 間 以 上 は か か っ だ でしょ 
う か 。 初め て 行なう 人 で も 納得 で き る 程度 
の 最短 コー ス を 通っ た わけ で す が ,。 な ん と 
手順 を 書き 留 ゆ る の に 使っ た 紙 は A4 版 が 7 
枚 。 ど ん な に 少な く 見 積もっ て も 300 以 上 の 
命令 の 文字 を 入れ な けれ ば な ら な いわ け で 
す 。 

清水 氏 い わく ,「 こ れ で も 会 話 の 部 分 は 省 
略し た ん だ よ 」 

こん な すご い の を 彼 は どう や っ て 解い た 
の で し ょ うか ネ ? 友人 と で 2 カ月 ほど か 
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か っ た と いう こと で す が 。 と ん で も な い 場 
面 で 思い も よら な いこ と を 行なわ な いと , 
決し て 解け る も の で は な い の で す 。 М2-700 
用 を や っ た こと の ある 人 な ら わ か る で し ょ 

う 。 あ の 十字 架 の 前 で X メ メ す る と か , £ 
れ を メメ メメ に わた し て 通る 、 な ん て こと 
は な か な か 思い つく も の で は あり ませ ん 。 

彼 に 言わ せる と, 答え を 連想 きせ る ヒン 
ト が どこ か し ら に 出 て くる の だ そう で , あ 
と は 努力 根性, それ と 想像 力 を は だ た ら か 
せ て あら ゆる 可能 性 を 確か め て いけ ば よい 
わけ で す 。 

私 は ほとん ど 頭 脳 労働 を 行なわ な か っ た 
わけ で す が , 奥 の 深 き に 血の気 の う せ る 思 
いで し た 。 それ に , 結構 余計 な 枝葉 が 付い 
て いて , 登場 人 物 と の 直接 解法 と は 関係 の 
な い 会 話 で も 楽し め ゅ ます 。 

この よう に , 内 容 は アド ベン チャ ー ゲ ー 
ム 狂 に 十分 勧め られ る も の の ひと つ で す 。 

MZ-80K/C/1200 を 持っ て いる 人 は ひっ 
そり と 身 ち を か くし て は いま す が ,。 まだ まだ 
相当 数 いる わけ で す 。K/C/1200 用 の 新作 
ソフ ト が 最近 出 な いと 嘆い て いた あな た / 
この 機会 に も う 一 度 MZ を よみ が えら せ て 
み ま せ ん か ? まだ ,X1 ユ ー ザ ボー の みな る 
ん も 。 そし て ,「 タ イム シー クレ ッ ト 」 の 世 
界 に 足 を 踏み 入れ て く 
だ さい 。 た だ も 。 で の 
世界 か ら 出 られ な く な 
oti, 当方 は いっ き 
い ヒ ント を お 教え し ま 
せん 。 なお, この 記事 
は 自動 的 に 消 減 ……, 
は し ませ ん ネ 。 

(大 西 太 ) 


ギン シン ビレッジ 
XI/C, MZ-2200/2000 
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アド ペン チャ ー 型 た し いっ て も, これ は い 
わ ば 番外 編 。 難 し く 考 える 必要 は な い 。 

も っ と も , どう せ ペ ン ギ ン 村 に 常識 な ど な 
ФОТ, まとも に や る と バカ を 見 る 。 な に 
し みろ …… ほ よ よ 。 

パッ ケー ジ は も ちろ ん , フタ を あけ る と 
アラ レ ち ゃ ん が オハ コン バン チム ハ (切り と 
っ て パス ケー ス に 入れ よっ と )。 テ ー プ を ロ 
ー ド る せる と ,。 うほ ほ ~ー い / 24 vili 
面 に も 鮮やか な グラ フィ ッ ク で アラ レ ち ゃ 
ん が 登場 、 ワクワク, ワク ワク / と いう 
わけ で GAME START / 
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XI/C/D, MZ-2200/2000/80B, MZ-700 


悩ん で し まう の だ 


物語 (t い うほ ど で も な い が ) は , トリ 
山 る ん の 誕生 パー ティ ー に 招待 きれ た の だ 
Dî, トト リ 山 る ん ち は と っ て も 田舎 で , 途中 
に は 分 か れ 道 6 も た くる ん ある 。 そこ で 私 は 
し っ か り と 道 に 迷っ て し まう と いう 筋書き 
な の で ある 。 ゲ ー ム の 進行 は 非常 に 簡単 で 
[А]— [L] & [5]. [7]. [8]. [5] キー に 
要 な モ セリフ と コマ ンド が 用 意 き る きれ て いる 。 
た だ ただし, 道順 に は 乱数 が 使用 きれ て いる よ 
ЭТ, 道 を 覚え て も ムダ 。 そし て 登場 する 
動物 た ち が ま た いん けん だ っ た り し て ……。 

る て 非常 に 残念 な こと に , ゲー ム 中 に は 


ブ プログ ラム 設計 に た だ 脱帽 


難し い 。 同 じ ア ド ベ ンチ ャ ー ゲ ー ム と い 
っ て も これ は テキ スト アド ベン チャ ー。 つ 
まり , 絵 が 出 ま せん 。 コ ンピュータ が 表示 
する メッ セー ジ に 対し て の 応答 で 進行 す る 
ゲー ム な の で す 。 同種 の も の と し て 米国 な 
ど コ ュ ン ピュ ー タ 先進 国 で は 昔 か ら 愛 る れ て 
いる ゲー ム の 一 種 な ん で す 。 AT b ZORK 
I ~ Ш (Infocom) が TOP10 に 顔 を 出す よ 
うに 親しま れ て いま す 。 しかし, 上 難しい 。 
先 に 進め な いん で す 。 甲板 か ら 通 路 , 通路 
か ら 部 屋 を 歩き 回 り , 駆け は 回 っ て , タル や 
チョ ゾウ コ , タイ ホウ や ガイ コッ に 出会う 
の で す が , あま り 走 り ま わる と ドア に ぶつ 
か っ て 『「 イ タタ 1 」 と いう こと に な り ま す 。 

そう で す 。 事 故に あっ て 太平 洋 を 漂流 し 
て いた わた し は , 目 の 前 に 現われ た 一 隻 の 


帆船 に よじ の ぼり , この 帆船 を 探検 する の 
で す 。 こ の 帆船 が 幽霊 船 で あわ る と も 知ら ず 


帆船 の 構造 に つい て は きわ め て 詳し く . 
平面 , 立体 の 多 方 に わた っ て 図解 し て お か 
な いと 迷路 ゲー ム に な っ て し まい ます 。 ど 
の アド ベン チャ ー ゲ ー ム も そう で す が , € 
料 片手 び メ モ を 取り な が ら ゲ ー ム し な いと 
頭 の 中 で ゴチ ャ ゴチ ャ 。 その うち 甲板 か ら 
落っ こち た り , 足 あ すべら せ て 死ぬ , す な 
わ ち ゲー ム オ ー バ ー。 し っ か り 腰 を すえ ぇ て 
ひと つ ひ と つ ナ ゾ ヅ を 解く これ が アド ベン 
チャ ー ゲ ー ム の 基本 で す 。 面倒 ど と 思っ て 
いる と この 世界 に は 入れ ませ ん よ 。 

この 幽霊 船 。 状況 設定 し いい アル ゴリ ズ 
ム 等 抜群 の 設計 で す 。 ゲ ログ ラム は S-BAS 


アラ レ ち ゃ ん も , ガッ チャ ン も , せん で い 
る ん も 出 て こない 。 も し 私 が アラ レ ち ゃ ん 


KELKO, どう し じ し て イヌ ス よ ボク シン シグ を 
し て 負け て し まう の か ? 悩ん で し まう の 
15% 


それ に し て も , 今月 は 難解 な アド ベン チ 
ャ ー が ひし めく 中 , 気軽 に 楽し ゅ る 唯一 の 
ゲー ム で は な い だ ろ うか 。 友 だ ちと 交互 に 
た めす の も 楽し い だ ろ う 。 

と ころ で , トリ 山 さ ん ち は , な ん で あん 
な に りっぱ な 屋敷 な の だ ろう か 。 ま た また 
悩ん で し まう の だ 。 (斎藤 E) 


V 


IC で 作ら れ て お り , この 種 の ゲー ム を 作成 


し た い 向 き に は “必修” の ソフ ト で ある と 
いえ る で し ょ う 。 リ スト を 見 て も 何ら 解答 
に つなが ら な い デ ー タ 形式 で 収め ゆめ 。 ル ー チ 
ン そ の も の も 簡素 に まとめ られ て いま す 。 
解析 に 時 間 を 要 す 練 られ た 設計 は , た だ 脱 
帽 の ひと こと に 尽き ます 。 

は じ め に も いい まし た が 。 初心 者 に は ち 
ょ っ と 難し いか も しれ ませ ん が , 試行 錯誤 
し て プレ イ を 繰り 返す うち 必ず 解け ます 。 
私 は も う 十 数 回 「 イ タタ ! 」。 メ モ を 取り な 
が ら で も これ で す 。 と ヒン ト 集 が 別途 用 意 き 
れ て いる よう な の で これ を 手 に 入れ て で も 
何と か クリ ア し だ い 。 何と な く 〈 先 は 見 えて 
きだ た よう な 気 が ます 。 (松崎 洋 ) 
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ADVENTURE, アド ベン テ チャ ー28 選 


ここ で 紹介 する アド ベン チャ ー ゲ ー ム 28 選 は , 愛読 者 カー ド で 人 気 の 高い も の , 
また THE SOFTOUOCH 評 価 グ ルー プ の 推薦 を も と に 作成 し まし た 。 


タイ プ ノ 入 力 方 法 ア スト ー リ ー 


ロー ルプ レイ ング 。 英字 入力 : ntti A Oka 
語 ・ 魔 神 語 一 」 で お な じみ の 長瀬 敏之 氏 が 制作 。 А 


テキ スト アド ベン チャ ー。Yes, No 方 式 : 俺 は 宇宙 の 旅行 者 。 今 日 は 8 つの 星 の 太 陽 系 に や っ て きた アノ 
さあ 何 が 起こ る か ? 楽し み だ ぜ / 


テキ スト & グラ フィ ッ ク 。 Yes, No 方 式 : 宇宙 空間 に 線 り 広げ られ る イマジネーション の 世界 。 
PARTI を 超え た , グラ フィ ッ ク ・ ス トー リー が 君 に 迫る / 


機種 / メ ディ ア / 価 格 / メ ー カ ー 


KVR I BAS 
EER у; 
-Т- 3,8008 © 
X1/C/D, MZ-2200/2000 
(G-RAM 要 ) 

= 3,5003 © 


リア ル タ イム を アド ベン チャ ー : 宇宙 戦争 の 中 。 地球 を 救う た め に 。 出 発し た 「『 セ ント コス モ 号 」 の |XI 7 


スト ー リ ー。 総 テ キス トメ モリ サイ ズ 150K バ イト 以上 。 10 回 を 超え る 分 割 ロ ー ド 。 開 発 期 間 10 カ 月 の 
クロ ス オ ー バ パー ゲー ム 。 ア ド ベ ンチ ャ ー と し て は , ちょ っ と 毛色 が 違う 。 


テキ スト アド ベン チャ ー。 カ ナ 入 力 : 中 世 風 の 異 世界 を 無 台 と し た ファ ンタ ジッ ク ・ ア ド ベ ンチ ャ ー。 


カナ 入力 :「 あ の LATX SOFT で 殺人 事件 が /」 ソフ LAO A CBEEMARACRAT T TUNE É 


を 開始 し た 。XTAL ソ フト の 最新 作 。 


英字 入力 : 会 社 を クビ に な っ た 男 が 次 に 選ん だ 職業 は ,「 ク リ 22189 


探偵 の 取り 組む 事件 は , は た し て 成功 する か 。 本 誌 3 月 号 THE 30FTOUOH で も 紹介 し た ア アド ベンチ | 00; 


ャ ー で す 。 


ロー ルプ レイ ング 。 英 数 字 入 力 : 長老 ティ タ ノ ア か ら 宝玉 を 手渡 され , ポイ ボス の 再建 を 誓う ジョ ー |XVC 


Zi, ジル ダニ 3 収容 所 を 脱走 し 仲間 を 集め , 数 々 の 困難 に 打ち 勝っ て , 
ら な い 。 行 け / ジョ ー グ , 輝け る 大 地 を 求め て 。 


クラ ー ネ 星 を 脱出 せ ね ば な 


テキ スト アド ベン チャ ー。 カナ 入力 : 幽霊 船 に 隠さ れ た 宝物 を , BENI S) ARIE ORT АО 


アド ベン チャ ー。 
英字 入力 : 不思議 な 家 , ワン ダー ハウ ス で , ダイ ヤ モ ン ド を 探し 出せ 。 


カナ 入力 : UCLA 留 学生 チャ ン ・ ギ ステ マラ は ミク ロ ネ シ ア の 隠し 財宝 を 求め て 出発 し た 。 し か し 途 
中 , RTEA BOCDn, チャ ン は 南 太平 洋 の 海 を さま よう こと に な っ て し まっ た 。 


カナ 入力 : スタ ー ア ー サ ー は 伝説 の 剣 を 求め て , 5, 未知 の 惑星 メ フ ィ ウ ス へ 降り 立っ た 。 連 作 と し 
て 発表 され た スタ ー ア ー サ ー 伝 説 が X1 シ リー ズ に つい に 登場 。 


カナ 入力 : その 時 日 本 中 の 目 が ひと り の 男 へ 集中 し た 。 果 た し て その 時 , 首相 は 犯罪 を 犯し た か ? . 
戦後 未 曽 有 の 疑獄 事件 を , あな た は 検察 官 と し て 追及 する 。 一時, 新聞 で も 話題 に な っ た , HRTF 
ベン チャ ー。 


英字 入力 : 埼玉 ・ 千 葉 の 血 の 抗争 が 純金 の ‘SARA’ を 永遠 の 謎 に し て し まっ た 。 あ な た は "ER a 


Ен” を 探し 出せ る か 。 
か つて な い 114 画 面 の アド ベン チャ ー ラ ンド 。 


英字 入力 : ある 日 あな た の 所 へ 手記 が 届い た が , な ぜ 今 ご ろ こ の 手記 が 届い た の か ? 。 彼 は 2 年 も 前 


に 行方 不明 と な っ て いた の だ . 
あな た は , 疑問 を 解く た め に , 彼 の 語っ て いた 館 へ と 出かけ た 。 


X1/C/ D, MZ-2200/2000 
/80B;MZ- -100 (S-BASIC) 


X1/C(G-RAM. dB-BAS 
10%) ` 


=T- 4,5009 ` 


X1/C (G-RAM) | 
—T— 3% 4,8000) 


X1/C(G-RAM 要 ) 
ーTー 4,0009 ® 


X1/C/D(G-RAM&) | 


ョ デキ ー 4,800F] —3ОЕ— 


英字 入力 : 34 vo VAPERORI 2 429 6 MAU 「 メ タフ ォ ト ン 号 」 に 乗り , 地球 の 歴史 の | 
中 か ら ダ ナー ク 人 の 攻撃 法 を 見 つけ だ し , フ ァ ラ ス 星 救出 の た め , MMC RS НЕ |— 
` SOFTOUCH 紹 介 以 来 . 人 気 の ロ ー ル プレ イン グ 型 アド ベン チャ ー。 Ñ 


カナ 入力 : 登録 語 は 100 を 超え , 41 画 面 4 方 向 164 の 選択 肢 が あり ます 。 ミ ステ リ TA ў 
込ん だ あな た は , みごと 使命 を 達成 で きる か ? 
本 誌 THE SOFTOUCH"83 年 12 月 号 で も 紹介 し た アド ベン チャ ー。 


記号 入力 : トリ 山 さ ん の バースデー パー ティ に 招待 され , 野 を 越え 山越え 行く , ドリ ー ム アド ベ ペンチ а 
ャ ー。 お な じみ アラ レ ち ゃ ん の 世界 で す 。 


英字 入力 : 室 ビ ピル の 5F に ある マイ クロ キャ ビン まで 無事 に た どり 着け る か 。 パー ト 1 で は エレ 
ー タ ー に 乗る まで 。 dem 


英字 入力 : パー ト 1 を クリ ア し た 人 が 楽 じ め る ゲー ム 。 一 部 分 リア ル タ イ ム を 使用 し て , より 難 
な っ て いる 。 U p 


чес 春の 日 ざし に うと うと と 眠り こん だ あな た は . いつ の ま に か 夢 の 中 を さま よい は じ め た 
- こ は ファ ンタ ジッ ク な 不思議 な 世界 で , 夢 の 出 口 を 見 つけ な けれ ば 目 ざ め る こ と が で きま せん 。 


スト アド ベン チャ ー。 英字 ・ カナ 選択 入力 : ルイ ス ・ キャ ロ ル 原 作 の 「 不 和議 の 国 の Ау) 
ee ыс ч Tes У ペン チャ ン だ か ら て - そ , あな た の 起 


E 電子 小説 と いわ れる ア ss d nd EN о. 
M5. を も ふけ 自分 だ け の 時 間 を 持て た と まき ゆっ < り と 時間 を か け て 導い で く 


| же; ЕЗ ステ リ элтейе 1, Vol лаб. ジオ ンチ ウ t pd 
を と りこ に する 。 


カナ 入力 一 枚 の 手紙 が あな た を ロマ ン と 畳 険 の 旅 へ と か り た て た 。 | 
саста 美 少 女 と の 出会い . 猛獣 の 襲撃, そし て クフ王 の 秘密 と は な に か 。 элс 
3 5 れる 壮大 な アド ベン チャ ー ド ラマ 。 


READ: 幻 の 「 ム ーー 大 陸 」 の 秘密 を 解く カギ は ? 巨大 な 石像 モア イ 。 жасау. пу 
字 、 奇 性 な 偶像 モア イ ・ カ ワ ・ カ ワ な ど , あな た に 挑み か か る 謎 , また 謎 / 頼れ る の は 知力 と 
pur. 


| 英字 入力 : 行方 不明 と な っ た 探検 隊 を 探し て 。 あな た は ビラ ミッ TUE 
路 や 数 々 の 恐 し い ワ ナ が あな た を 待ち うけ て いる ミス テリ アス な アド ベン チャ ー。 


注 .) 表 内 の ソフ ト は , メー カー 名 の 五 十 音 順 . 同 メー カー ソフ ト に つい て は 五 十 音 順に な っ て お り ま す 。 


o 表 中 の 記号 に つい て 
T: テー プ 版 5FD : 5 イン チ フ ロッ ピー ディ スク 版 3CD : 3 イン チコ ン パ クト フロ ッ ピ ー 版 


問い 合わ せ 先 


株 ) エ ニッ フス T160 新宿 区 西新 宿 -1-8 容 03-367-1911 プ @⑥ キ ャ ヤリ ー ラ ボ T862 熊本 市 大 江 6-25-25 金 ピル 1F | . 谷 096-363- | 
0241 7 ⑳ フ リス タル ソフ ト ( 株 ) F533 大 阪 市 東淀川 区 豊 新 3-8-11 い ほり ビル 2F 傘 06-326-8150 / の 大 名 マイ コン 学院 (САТ | 
* SOFT) F810 РЕС skay = S aa 会 092-715-8526 / 人 W( 株 ) 新 紀元 社 7160 PEKE REI AIL 
. BF 203-350-068 / @22Z222— EN) T780 高知 市 朝倉 内 434-14 270888-40-1207 / (Q7—tC—"/7t- T060 札幌 市 中 
_ 央 区 北 3 条 西 4 丁目 カミ ヤマ ピル 4F 011-251-7480 / ④( 株 ) テ ィ ー ア ンド イー ソフ ト (T&E SOFT) T465 名 古屋 市 名 東 区 際 が 丘 
41 長 が 丘 ピ ル 4F 容 052-773-7770 / 東映 ビデ オ (株 ) (ЕН СОМ) F104 中 央 区 銀座 3-15-10 八 重 洲 興 業 銀座 ビル 7F 03-545-4511. | 
⑬/ ハ ハドソン 東京 (HUDSON SOFT) T102 千代 田 区 麹町 4-7-5 殆 町 ロイ ヤル ビル 2F 容 03-234-4996 / (株) 計測 技研 (BASIC | 
HOUSE) 7320 宇都 宮 市 桜 3 丁目 2-17 0286-33-1994 / (SOHO! ХАЛАЛ (BOND SOFT) T430 浜松 市 常 腹 団 140-2 7%0534- 
53-6186 / ⑥( 株 ) ボ ニーPONYCA 開 発 室 T102 千代 田 区 九段 北 4-1-3 日 本 ビル ディ ング 3F 203-265-6377 / ⑩( 株 ) マ イク ロ : 
Ба еле 120593-51-6482 / スト ラッ ト フ ォ ー ド ・ uem 
BC 00) F336 浦和 市 南浦 和 2-36-15  fR0488-85-5222 | 3 


バッ ケー ジ ソ フ ト 紹 介 マ ニュ アル 89 


Adventure, ア ド ベ ンチ ャ ー 


これ が プロ の テク ニッ ク だ 


ー 一 不 興 議 の 国 の アリ ズー 一 


内 マイ クロ キャ ビン 


多 湖 


「 ミ ステ リー ハウ ス 」 を 先駆 と する アド べ ベ 
ンチ ャ ー ゲ ー ム も , 最近 で は か な り 数 多く 
出 て き て いま す 。 基本 の テキ スト アド ベン 
チャ ー も の か ら 画 面 数 が 100 を 超え る も の ま 
で , ま だ まだ 可能 性 を も つ ジ ャ ン ル で す が , 
今回 , Oh /MZ の 読者 の 皆さん の た め に , 
あの 「 ミ ステ リー ハウ ス 」 を 作り 上 げた マ 
イク ロキ ャ ビン より , アド ベン チャ ー ゲ ー 
ム 作 り の Know-How を 公開 し て いた だ きま 
し た 。 今 回 の テキ スト と な る ゲー ム は , PC 
用 で 発売 され て いる , テキ スト アド ベン チ 
ャ ー 「 不 思 議 の 国 の アリ ス 」 で , MZ-80B 
/2200/2000 は も ちろ ん , MZ-5500 で も ,「 シ 
ステ ム ソ フ トウ ェ ア コ ン バ ー タ 」( マ イコ ン 
ショ ッ プ BASIC HOUSE) を 使え ば X1 で 
も , また S-BASIC を 使っ て , 一 部 修正 すれ 
ば MZ-700 で も 作動 し ます 。 
まず は 扉 を た た いて み ま し ょ う 。 


明 雅 


アド ベン チャ ー ゲ ー ム の 構造 1 
まず , この プロ グラ ム の 特徴 を 説明 し な 
が ら , アド ベン チャ ー ゲ ー ム の 構造 に つい 
て 説明 し て いき ます 。 
この アリ ス の プロ グラ ム 構 造 は , 基本 的 
に は シー ン ・ ブ ロッ ク に よっ て 形成 され て 
いま す 。 た と えば , 信 ア リス が 駅 に いる と 
し まし ょ う 。 こ の 状態 で アリ ス に で きる こ 
と は , キッ プ を 買う こと , 電車 に 乗る こと , 
駅 か ら 出 る こと で す 。 こ こ で , この 仮想 場 
面 を プロ グラ ム の 形 に し て み ま し ょ 2 う 。 
10 PRINT "アナ タ ^ イマ エキ 
=: dux 
20 INPUT A $ 
30 IF А9-“%у” 7 カウ "TH 
EN モチ モノ ニー モチ モノ キキ ッ プ :: 
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GOTO 20 

40 ТЕ A$S=" デ アン シシ ャ = уж Т 
НЕМ GOTO ж 電車 の 中 の 仮想 シ 
ーー タグ 

50 IF A$ー" エ キ 7 >л” THEN 

СОТО * 駅 前 通り の 仮想 シー ン 

60 PRINT "ソノ ヨウ + コウ ドウ 

ж Жетеу,” 

70 СОТО 20 

と ああ 。 ぎ ざっ と ん な も の で は 92% 
実際 は も っ と 複雑 な も の に な り ま す が 。 こ 
れ が いわ ゆる シー ン ・ ブ ロッ ク と いう も の 
で す 。 ち な み に , あの 「 ミ ステ リー ハウ ス 」 
は 全面 的 に この 方 法 を 用 いて いま す 。 

と ころ で , 上 記 の プロ グラ ム 中 に ,「 モ チ 
モノ 」 と いう 変数 が 出 て きま し た が 。 アド 
ベン チャ ー ゲ ー ム の プロ グラ ム 中 で は , © 
れ ら の 変数 が 実に 重要 な 働き を し ます 。 こ 
の 種 の 変数 は , ほか に も 多種 多様 に わた っ 
て 使わ れ ま す 。 ア リス が ドア の 鍵 を 持っ て 
いる か いな いか , ドア が 開い て いる か いな 
е», 時 計 が 動い て いる か いな いか , ШЕ 
ЖЕ, お よそ ゲー ム 中 に 出 て くる も の は す 
べ て 0 か 1 な どの 数 字 に よっ て ,。 それ ぞ れ 
の 変数 に 収め られ る こと に な り ま す 。 いわ 
ば この 仮想 世界 は , すべ て 個々 の 数 字 に よ 
っ て 構成 きれ て いる と いっ て も いい の で す 。 
ECT? イメ ー ジ が 浮か びました か ? 

この こと は ゲー ム に 重大 な 影響 を 与え ま 
す 。 た と えば , 先ほど の プロ グラ ム の 続き 
С, アリ ス が 電車 に 乗っ た と し ます 。 そし 
て 四日市 で 降り た と し ます 。 そこ て 改札 を 
通る と き , プロ グラ ム は 先ほど の モチ モノ 
と いう 変数 を 調べ ます 。 キ ッ プ を 持っ て い 
る か いな いか は , そこ に 0 か 1 と いう 形 で 
明確 に 表 わ れ て いま す 。 駅 員 の 代わ り を する 
プロ グラ ム は , も し アリ ス が キッ プ を 持っ 
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て いれ ば 「 あ り が と う ご ざ いま し た 」 と 言 
っ て 通し て て くれ, も し 持っ て いな か っ た ら 。 
問答 の 末 , 近鉄 全線 の 3 倍 の 料金 を 請求 る 
れ , お 金 を 持っ て いな か っ だ アリ ス は , 一 
生 近 鉄 で タダ 働き を る せら れる , と いっ だ 
ふう で す 。 
も うだ いぶ 理解 され た と 思い ます が 一 
応 こ れ を プロ グラ ム に 落と し て み ま し ょ う 。 
10 ТЕ А$= беа 7 デル な AND 
モチ モノ の 中 に キッ プ が ある THE 
N PRINT "アリ ガト ウゴ ザイ マシ 
タ 。:GOTO* 駅 の 外 の 仮想 シー ン 

2 IF А$= *®% 7 デル AND 
モチ モノ の 中 に キッ プ が な い ТН 
EN PRINT ` ナ ント ユー ヤツ ダ , 
їл 7 ヨウ ナヤ ジウ > イッ シ 
ョ ウツ ウツ ベ セ ン 2 エキ イン トシ 
テ タ ダバ タラ キサ セテ ヤル 。 ガ ミ ガ 
ミ ーーー ケ 2 END 

だ いた いこ うい う 具 合 に な り ま す 。 

ST, 今 ま で お 話し し て きだ た プログ ラム 
の 構成 に は , 大 き な 欠 点 が あり ます 。 た と 
えば , 仮に アリ ス の 舞台 設定 や ドア だ ら け 
の 迷路 みた いな 家 だ と し ます 。 す る と , F 
ア の 数 だ け の 変数 と ドア の 数 X 2 (同じ ド 
ア で も 別 の 部 屋 か ら 見 る と 別 の 処理 ルー チ 
ン と な る ) の 処理 ルー チン が 必要 で す 。 こ 
れ は , ドア の 数 が 多く なれ ば な る は ほど メモ 
リ を 食う わけ で す 。 TAKE THROW な ど 
t, あら ゆる 可能 性 を 考え て 、 プ ログ ラム 
に 組み 込ま な く て は いけ ませ ん 。 

Са, な ぜ こ の 方 法 を 採用 し た か と いう 
Lt, 作る の が 簡単 どか ら で す 。 誰 で も 簡単 
に アド ベン チャ ー ゲ ー ム が 作れ る と いう こ 
と で す 。 前 に あげ た プロ グラ ム 例 か ら も 。 
この 方 法 だ と 頭 に 描い た イメ ー ジ が ダイ レ 
クト に プロ グラ ム に 落と せる と いう こと が 


わか る と 思い ます 。 そ の ほか に も , まっ た 
{ 処理 系 の 違っ た プロ グラ ム , た と えば リ 
アル タイ ム ゲ ー ム な ども 簡単 に 組み 込む こ 
と が で きま す 。 ま た , 複数 で 並行 し て プロ 
グラ ム 作 り を する 場合 WE Же, 20 
どちら も 簡単 に どき ます 。 

ご 覧 に な っ だ よう に ., 個々 の シー ン ・ プ ブロ 
ッ ク は まっ た だ く 独 立 し た も の と し て 存在 し, 
使用 変数 きえ きち ん と 統一 し て むけ ば , 5 
と で プ ブロッ ク を 組み 合わ せれ ば 完成 する と 
いう わけ で す 。 この 方 法 は 開発 期間 が 限ら 
れ て いる と か , 複数 で 共同 開発 する 場合 に 
大 き な 効 果 が あり , これ ら メ リッ ト の た だ め , 
今日 で も 比較 的 多用 され て いる よう で す 。 
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次 に , 今 まで お 話し し て きだ た の と は 別 の , 
アド ベン チャ ー ゲ ー ム の た め の 処 理 構造 を 
お 話し し まし ょ う 。 

これ は , 主 に 入力 ふれ た 動詞 別に 処理 を 
行なう 方 法 で す 。 動 詞 の 種類 に よっ て 分 類 
る され た だ 先 で , さら に 名 詞 に よっ て 判断 され , 
必要 な も の は る さらに シー ン 別 に 判断 され ま 
す 。 

さら に この 方 法 に は , ほとん どの 場合 に 
お いて , デー タテ ー ブ ル に よる 処理 方 法 も 
取り 入れ られ て いま す 。 

この 処理 方 法 は , パラ メー タ (入出 力 語 
群 や 出力 メッ モー ジ 群 な ど ) を デー タ と し 
TRO, フラ グ (文字 どおり 「 旗 」 と いう 5 意 
KT, 代入 る れ て いる 数 字 に よっ て 何ら か 
の 状態 を 表わす 変数 ) 群 を 配列 に 収め て 一 
括 処理 が で きる よう に し , アドベンチャー ゲ 
ー ム 中 の 判断 部 分 (ЕХ) を 最低 限 に お さき 
える と いう 方 法 で す 。 

プロ グラ ム は まず , 入力 され た 語句 を , 
持っ て いる デー タ と 順次 比較 検討 し , 相当 
する 単語 に 対し て フラ グ を 操作 し , 出力 デ 
ー タ の 中 か ら そ の 時 点 の 状況 に 見 合う も の 
を 選び 出し て 表示 し ます 。 ま た , これ ら 6 の 
デー タ は 一 定 の 規定 に 従っ て 並べ さら れ て お 
b (テー プル 化 ), プロ グラ ム の 最後 また は 
先頭 に まとめ て 置き ます 。 

ここ で ひと つ , この 方 法 に お ける プ ブログ 
ラム の 流れ を 考え て み ま し ょ う 。 

シー ン ナ ン バ ー (その 場面 に つけ られ た 
番号 ) が 3 の 場所 で , “OPEN” と 入力 され 
た 場合 、 プ ログ ラム は まず “OPEN” Lu 
5 単語 を 識別 し て “OPEN” の 処理 ルー チ 


ン へ 飛び ます 。 そ し て その 中 で “DOOR” を 
識別 し , その シー ン の ドア の フラ グ を 立て 
(1 を 書き 込む ), ドア が 開い た こと を 示し 
ます 。 

ここ で 注目 し て ほし い の は , ドア を 表 わ 
す 変 数 に , 添字 を シー ン ナ ン バ ー に し た 配 
列 変数 を 使う たと, ひと つの 処理 ルー チン で 
全部 の ドア が 操作 で きる と いう こと で す 。 
この 方 法 は , 多く の 部 屋 で 同じ こと を 繰り 
返し て 行なう よう な , た と えば 家 の 中 の 宝 
探し な どの ゲー ム に は , メモ リ の 節約 に な 
り 大 い に 有 効 で す 。 ち な み に 「 明 霊 船 」, 「 鍵 
穴 殺 人 事件 」 な ど が , この 方 法 を 採用 し て 
いま す 。 

た だ この 方 法 の 欠点 は , 前 も っ て アド ベ 
ンチ ャ ー の 舞台 設定 を し っ か り 決 め て お く 
必要 が あり ます 。 シー ン の 変更 や 削除 , 追 
加 な ど た い へ ん な 労力 を 必要 と し , わけ の 
わか ら な い バ グ な ども 出 や すく , 精神 衛生 
上 好ま し く あ り ま せん 。 で すか ら , あま り 
初心 者 に は お すす めで きる 方 法 で は あり ま 
せん 。 


両 万 を 兼ね 備え だ 新しい 亡 法 を 


き て ここ で , 本 プロ グラ ム で す 。 ГЕЙ 
の 国 の アリ ス 」 の スト ー リ ー を 用 いて , Ж 
際 に プロ グラ ミン グ を する に あたり , 今 ま 
で 述べ て きた 2 つの 方 法 を 兼ね 備え た 新 し 
い 方 法 を と いう こと で 考え て み ま し た 。 ど 
うい うこ と か もい うと, だ こ で ち も 使 うこ と 
の で きる よう な 一 般 的 な 動詞 (LOOK, TA 
КЕ, THROW, EAT, INVENTORY, SA 
VE, LOAD) は 動詞 別に 分 岐 き せる 方 法 で 
処理 させ , 特殊 な , また は 変則 的 な 動詞 は 
各 シ ー ン 別 の 処理 ルー チン へ 飛ば す , tv 
う よ う な 方 法 で す 。 単語 群 や メッ セー ジ 群 
は で きる 限り デー タ 化 し , シー ン 中 に 出 て 
くる 物 は , すべ て 圧縮 , デー タ 化 し て あり 
id. 

また , デー タ の 扱い で す が , 名 詞 の 中 で 
DOOR HOUSE Z E, 同じ 単語 が 複数 個 
使わ れ て いる の は , 1 つ ひ と つ を 区 別して 
表わす た めで す 。 た だ たとえ ば, HUGXL- 
月 ウサ ギ は と も に RABBIT で す が , まっ た 
《 別 の キャ ラク タ と し て 扱い ます 。 

これ に 対し て 動詞 は 場面 ご と に 区 別 さ れ 
て いま せん 。 すべて の 場面 に 共通 の 一 単語 
で 動作 を 表わし て いま す 。 

移動 可能 な 名 詞 と 移動 不可 能 な 名 詞 も 区 


別して 配列 に 格納 し て いま す 。 

まだ た だ, この プロ グラ ム 特 有 な も の として, 
体 の 大 きる を 表わす フラ グ が あり ます 。 し 
た が っ て , これ に 類する 一 種 の 状態 (眠っ 
て いる , 力 が 強く な っ て いる , 魔法 を か け 
られ て いる な ど ) に つい て も 考慮 し な けれ 
ば な り ま せん 。 し か し , ご さく 短期 間 の 状態 
な ら , 個別 に 処理 し た ほう が 有利 な こと も 
あり ます 。 

デー タ 有 圧縮 に つい て は いろ いろ な 方 法 が 
あり ます が , ここ で は 2 進数 の 各 ケ タ を フ 
ラグ と し て 取り 出し , 必要 で な いと き は 10 
進数 に し て し まっ て お く と いう 方 法 を と っ 
て いま す 。 暗 号 化 を 考え る な ら , 素数 を い 
くつ か か け て いき , 特 定 の 素数 で 割っ て , 割 
り 切 れる か 否 か を 確か め る の も よい で し ょ う 。 
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それ で は 以上 の こと を 念頭 に お き な が ら 
「 不 思 議 の 国 の アリ ス 」 の プロ グラ ム を 解 
説 し た いと 思い ます 。 

人 @ 初 期 設 定 8620 一 9740 行 

イニ シャ ライ ズ 後 , メイ ン ル ー チ ン へ 飛 
び ま す 。 こ こ で 各 デ ー タ の 変数 へ の 格納 , 
お よび 各 変 数 の 初期 設定 を 行ない ます 。 

持ち 物 , 各 シ ー ン に ある 物 は , それ ぞ れ 
ひと つの 変数 に 圧縮 きれ て 格納 され て いま 
Fo これ は 主 に メモ リ 効 率 を 上 げ る た めで 
す 。 マ シン 語 化 へ の 布石 た も な る よう に 2 
進数 で 表現 し て あり ます 。 

最後 の ほう に 2 の べき乗 が わざ わる 配列 
中 に 入れ て あり ます が , これ は ひと え に PC- 
8001 の せい で す 。2 の べき 乗 は , 10 進 2 
進 変換 の と ころ で 使う の で す が , PC-8001 
に この 計算 を も や ら せ る と 誤差 が 大 きく て 実 
用 に な り ま せん ( 家 の 中 に 突然 木 だ が は えた 
りす る の で す )。 僕 は ゲロ グラ ム の バグ か と 
思い 必死 で 悩み まし た が , 誤差 と わか り , 
腹 立 ち まぎれ に , 使い を うな 2 の べき 乗 は 
みん な 配列 に 放り 込ん だ ど と いう わけ で す 。 
MZ 用 に も , スピ ー ド が 上 が る と いう 利点 が 
ある だ た めそ の まま 残し て いま す 。 

@ メ イン ルー チン 

ュ マ ンド 入力 , 動詞 ・ 名 詞 分 割 , 動詞 判 
Br, 名 詞 判 断 . ユマ ンド ・ シ ー ン へ の 分 岐 , 
メッ セー ジ 部 分 か ら な っ て いま す 。 

詞 ・ 名 詞 分 割 は 英語 用 , 日 本 語 用 別に 
作っ て あり ます 。 日 本 語 用 の ほう は , 助詞 
が 入っ て も いい よう に 処理 し て いる の で ち 
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ょ っ と 複雑 で す 。 実際 は 助詞 まで 判断 し て 
いな い の で す が ,。 ちゃ ん と 調べ る の も いい 
Сы?» 

動詞 ・ 名 詞 判 断 の と ころ で , 入力 し た も 
の と 一 致し た と き の デ ー タ の 番号 を 使い . 
これ を 組み 合わ せ て (上 位 2 桁 … 動 詞 番号 , 
下位 2 桁 … 名 詞 番号 )、 入 力 し た コマ ンド の 
代わ お り 紀 し で いま ず 。 こ れ に よう て 。 メモ 
リ の 節約 (IF A$= "OPEN DOOR" L 
り も IF A=1032 の ほう が 数 バイ ト 少 な い ) 
ә, 一 見 し た だ け で は , 答え が わか ら な い 
プロ グラ ム を 作る こと が で きる と いう 利点 
が 生じ ます 。 

その 他 , THROW や TAKE の 特殊 処理 も 
行なっ て いま す (内 容 は ひみ つぎ ) 。 
@ 一 般 動詞 の 判断 

いよ いよ 各 動 詞 の 判断 で す 。 まず LOOK 
サザ プル ー チ ジン で す 。 こ こ で 注意 し て ほ も い 
の は , 文字 型 ア ド ベ ンチ ャ ー ゲ ー ム で は , 
場面 が 進む ご と に , 情景 描写 を 行なう と い 
うこ と で す 。 つ まり 場面 が 進む 時 点 で , H 
動 的 に LOOK が 入力 され る と いう こと で す 。 
きら に , 絵 が 出る タイ プ の も の に 比べ て , 
細か い 説 明 の つい た 文 を 出 き なけ れ ば な り 
ませ ん 。 よって, この LOOK サ ブルー チン 
は , 汎用 性 に 富ん で いな く て は な り ま せん 。 
LOOK の 対象 と な る 名 詞 も 情景 も , すべ 
て 変数 に 代入 る れ て いま すか ら , これ を シ 
ー ン ナン バー か ら 算 出し て 表示 し ます 。 A 
力 の と き , 名 詞 を 指定 し た と き の 場 合 分 け 
も 必要 で す 。 ま た だ た, さら に 持ち 物 の 描写 を 
詳し く 行 な に いたい , と いう 人 の 参考 例 と し 
C, ここ で は 持ち 物 に 対し て LOOK を 行 な 
っ た 場合 「*carring*」 と いう メッ セー ジ 
も 同時 に 出す よう に し て み ま し た 。 
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きら に , LOOK し て 初め て 出現 する 物 の 
処理 も 行なっ て いま す (た と ぇ えば, TABL 
E を LOOK したら, その 上 に KEY が 乗っ て 
いる の を 見 つけ た , と いう 類 の 処理 で す )。 

ЖШ, TAKE サ プル ー チ ン で す 。 ここ に 
至っ て , よう や 〈 固 定 物 と 可動 物 の 分 離 の 
恩恵 に あず か れ ま す 。 可動 物 の 場合 .、 それ 
を 持ち 物 の 中 に 取り 入れ ます 。 

「 不 思 議 の 国 の アリ ス 」 で は 「 体 の 大 きき さ 」 
と いう パラ メー タ が 存在 する の で , ここ で 
は その 処理 ( 体 が 小さ いと , 手 が と どか な 
い /) を し て いま す 。 

KU THROW Ç +, TAKE と 逆 の こと を 
や っ て いま す 。 コマ ンド 別 処理 を し た 利点 
が 一 番 よ く 表 われ て いま す 。 

EAT ルー チン で す 。 こ こ は 主 に きのこ を 
食べ た と き の 処 理 (詳し く は , な ・ い ・ し 
29%) を や っ て いま す が , シー ン 中 に 出 て 
くる 物 を 食べ た と きも , 一 応 処理 は し て い 
ます 。 

INVENTORY で す 。「 持 ち 物 を 調べ る 」 
と いう 意味 で 使っ て いま す 。 持ち物 の 変数 
を 調べ , ビッ ト が 立っ て いる 名 詞 を 表示 し 
て いき まず す 。 

最後 に SAVE・LOAD ル ー チ ン で す が , 
これ は あと で つけ だ た し だ た コマ ンド な の で , 
プロ グラ ム の 最後 の ほう に 置い て あり ます 。 
ここ で は , 変わ る 可能 性 の ある 変数 を すべ 

デー タ と し て 外部 記憶 装置 に 書き 込み 
i+, それ を も と の 変数 に LOAD し な お す 
こと に よっ て , 前 の ゲー ム の 状態 を 再現 し 
i$. 

以上 が メイ ン ル ー チ ン と 一 般 動詞 処理 の 
説明 で す が , 結構 多く の テク ニッ ク を 盛り 
込ん で あり ます の で , わか り に くい 個所 が 


表 2 名 詞 (移動 不可 能 ) 


жз жи (移動 可 能 ) — 


多い と 思い ます 。 しかし,。 プ ログ ラミ ング 
の ネッ ク と な る の は , フラ グ の 設定 と 処理 


の 順序 な どですか ら , 自分 が わか りや すい 
構成 で び で プログ ラム を 組み 立て て みて くだ きる 
a そし て 行き 詰まっ て し まっ た 6。 この 
「 不 思 議 の 国 の アリ ス 」 の 中 に , うま い 解 決 策 
が な いか と ,。 探し て みて くだ さい 。 き っ と 
よい 参考 に な る と 思い ます 。 

次 は , 各 シ ー ン ・ ブ ロッ ク の 解説 で す 。 

シー ン ナ ン バ ー は プロ グラ ム 中 の リマ ー ク 
文 に 書い て ある の で 参照 し て くだ さい 。 
@Scene 1 

まず 最初 に 、 この 場面 で 有効 な コマ ンド 
を 判別 し て いま す 。 有効 で な い コ マン ド に 
対し て も , 特別 な が メッ セー ジ を 出力 し た い 
と き に は この 部 分 で 処理 し て か ら , 再度 , 
入力 待ち に 戻し ます 。 

有効 な コマ ンド に 対し て は , それ に 応じ 
た 処理 を 行ない ます 。 こ の と きも 主役 と な 
る の は フラ グ 操 作 で す 。 あ る 命令 が 入力 き 
tf: t š, これ が 成立 する か 否 か を フラ グ 
に よっ て 判断 し ます 。 た と えば ドア を 開け 


Dy ? сежу вр, 名 詞 の 通し 番号 | ат 


< 1( еа 


сла 


BTS) 


NN 
~ で に 使わ れ て いる と き , それ を 無視 する よう に す 


e 


る と き な ら ,。 カギ は か か っ て いな いか ,, Ж 
が 小さ いと き は , ドア の ノブ に 手 が 届 か な 
いな どの 条件 は どう か , すでに 開い て いな 
е», な ど を 1 つ ひ と つ 検 討 し ます 。 
この 「 入 力 待ち に 戻す 」 処 理 は , 非常 に 
頻繁 に 行なわ れる た だ ため, 各 場 面 は それ ぞ れ 
サブ ルー チン と し て 取り 扱わ れ て いま す 。 
これ な ら , RETURN 文 ひと つ で メイ ン ル ー 
チン の ルー プ に 戻す こと が で きま す 。 し か 
L, この と き は ,GOSUB 文 と の 対応 を し っ 
か り と 覚え て お いて くだ きい 。 そ うし な い 
t, 戻る べき 場所 を 見 失っ て し まい ます 。 
プロ グラ ミン グ 上 達 の カギ は , ここ ら あ た 
り の 注意 力 に ある の で す 。 
@Scene 2 

何 度 も 同じ コマ ンド が 入力 され た し とき, 
常に 変わ ら ぬ 表示 を する の は , わか りや す 
い 反面 。 面白 き に 欠け ます 。 と いう わけ で 
ここ で は , 何 度 も ウサ ギ に 話し か ける と , 
「 何 度 も 話し か け な い で くれ ……」 と 答え る 
よう に 工夫 を し て み ま し た 。 も ちろ ん ,「 す 
で に ウサ ギ と 話し た か 否 か が 」 の フラ グ を 用 
いて いる こと は 言う まで も あり ませ ん 。 
@Scene 3 

ゲー ム が 途中 で 終わ っ て し まう 例 で す 。 
この プロ グラ ム で は , 途中 で 終わ っ て し ま 
うぅ 理由 を 説明 し た の ち , END 文 で 終わ っ て 
し まい ます が , 再度 ゲー ム を 行なう か 否 か 
を 尋ね る よう に し て も よい で し ょ う 。 こ の 
t z, 変数 の 初期 化 に 気 を つけ て くだ さい 。 
初期 化し な いと , と ん で も な い フ ラグ が 立 
っ た まま に な る 恐れ が あり ます 。 CLEAR X 
を 用 いる と 効果 的 で し ょ う 。 
@Scene 4—12, 14, 15, 18 

特に 書く こと は な いで し ょ う 。 比 較 的 簡 
単 な 部 分 な の で , フラ グ の 動き を 追い な が 
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ら プ ログ ラム を 読ん で みて くだ きい 。 
@Scene 13 

迷路 の よう な 森 を ぬけ る と き の 方 向 の 入 
力 を ここ で 独立 に 処理 し て いま す 。 

部 分 的 な 処理 に よる 入力 な の で , 方 向 の 
ほか の コマ ンド は 受け 付け な く な っ て し ま 
いま す が , 工夫 次 第 で は 解決 どき る と 思い 
ます 。 そ の だ ため に は コマ ンド 入力 部 分 が サ 
プル ー チ ン 化 きれ て いな けれ ば な り ま せん 。 
この サ プ ブ プルー チン を コー ル す る こと に よっ 
T, どん な 場面 に な いて も 入力 の 判断 を 行 
な うこ と が で きる の で す 。 REL, で ぐれ で 
れ も GOSUB RETURN の 対応 に は 気 を つ 
け て くだ さい 。 へ ヘタ する と , 自分 自身 を コ 
ー ル し て し まっ た (再帰 的 呼び 出し は BA 
SIC で は 許さ きれ て いま せん ) と いう デバ ッ 
グ の 困難 な バグ を 生じ る こと に な り ま す 。 

た だ 「 不 思 議 の 国 の アリ ス 」 で は , コマ 
ンド 入力 それ 自体 が メイ ン ル ー チ ン と な り , 
各 場 面 処 理 な ど を サブ プ ル ー チ ンコ ー ル する , 
と いう 構成 の た め 入 力 の 判断 を 行なう の は 
困難 で す 。 

@Scene 16, 17, 19 

この あたり, 体 の 大 きる の 変化 に 気 を つ 
け て 読ん で くだ きい 。 

Жоха ё, と いう よう な 即 物 的 で な い 
も の は , 持ち 物 の リス ト を と っ て も 表示 さる 
れ ま せん か ら , 表現 を 工夫 し て , プレ イヤ 
ー に うま く 悟 ら せ る 必要 が あり ます 。 
Өз5сепе 20 

いよ いよ クラ イマ ックス で す 。 こ の プロ 
グラ ム で は , 終わ り に 近づく ほど, ВЛА 
ッ セ ー ジ が 長く て な っ て いま す が ,「 こ こま で 
作れ ば で きた も 同然 」 と いう わけ で , 思わ 
ずい ろ い ろ と 書き た く な る も の な の で す 。 

た くさ ん の 表示 を 一 度 に 行なう と き に , 


ゆっ くり , 徐々 に 表示 し て いく と いう 方 法 
を と っ て いま す 。 
@ 最 終 場面 処理 

アド ベン チャ ー ゲ ー ム に は , 必ず 目的 と 
する も の が あり , エン ディ ング まで 到達 し 
た と いう こと は , 当然 その 目的 を 果たし た 
と いう こと に が : 民 表す 。、 を そこ で エン デオ 
ング メッ セー ジ は , 祝福 の 言葉 と な る の が 
普通 で す 。 しかし, あまり に あっ け な く , 
「CONGRATULATION」 で は , せっ か こ 
こま で きた 努力 も 報い られ ませ ん 。 美 辞 硫 
名 を 並べ さ た て る の も よい の で す が , あっ / 
と 艇 く 意 外 な 結末 と いう の も 楽し く て 良い 
か も 知れ ませ ん 。 


これ で 僕 の 解説 は 終わ り で す 。 み な さん 
も 一 度 ア ド ペ ンチ ャ ー を 作っ て , 友人 な ど 
に 遊ば せ て や っ て くだ さい 。 友 人 の 苦し な 
顔 を 見 る と 、 や みつ き に な り ま す よ の 
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リス ト 
E 1000 REMZ** START 


1050 REM^** 1093-2532 

1060 А-н(0) 

1070 АФ-"" 

.1080 FDR B-26 TO O STEP -1 

IF А>-ТА(В) THEN AsSA-TA(B):4$-0$4"1":GOTO 1110 
1100 A$=A$+"0" 

1110 NEXT 


1150 A$-"" 
1160 FOR Ізі TO LEN(B$) 
1170 A-ASC(MID$(B$,1, 12) 

IF (96€A)*(04123) THEN А-А-52 
1190 A$=A$+CHR$ (A) 
1200 NEXT 
1210 RETURN 
1220 REM^X** MAIN 

PRINT 


1250 


IF АФ-"" THEN 1220 
1280 GOSUB 1140 
21290 REM^** К“ о», 4 

1300 A=1 

IF LU$="J" THEN 1380 

IF MID$(A$,0,1)2" " THEN A-A-1:G0TO 1350 
IF AX»LEN(A$) THEN A=A+i:GOTO 1520 
I2$-"":GOTO 1350 
12$2MID$(A$,0*2,LEN(CA$) -A-1) 
I1$2LEFT$(A$,A4) 

1370 GOTO 1480 


1280 


1380 IF MID$(A$,5,1)2" " THEN B=A+1:A=A-1:60TO 1430 
1390 IF AX^LEN(A$) THEN A=A+1: GOTO 1380 

1400 11%=А% 

1410 I2$-"" 


1420 GOTO 1480 


1430 IF MID$(A$,B,1)-" " THEN B-B*1:G0TO 1460 
1440 IF B<>LEN(A$) THEN B-B*1:GOTO 1430 

1450 В=А+2 

1460 12%=1 ЕҒТФ(АФ, А) 

1470 I1$-2MID$(A$,B,LEN(AS) -В+1) 

1480 С1=1 

1490 IF 11%-УБ%(С1) THEN 1550 


1500 С1=С1+1 

IF C1«27 THEN 1490 

1520 PRINT "VLA 3" キマ セン 。"s GOT ロ 1220 
1530 FOR Ізо TO 3 

1540 CH(I)=VAL(MID$(MA$(ND),2%I+1,2)) 
IF CH(I)*0 THEN СН(1) =99 

1560 NEXT 


IF BT-CH(A) THEN A=A+1t GOTO 1620 

IF 12%-МА%(0,ВТ) THEN 1720 

1620 ВТ=ВТ+1 

IF ВТ<27 THEN 1600 

1640 FL=1 

1650 BT=O 

IF 12$9-NA$(1,BT) THEN 1720 

1670 ВТ=ВТ+1 

IF ВТ<15 THEN 1660 

IF 12$4»"" THEN PRINT 12%;" ??":GOTO 1220 
1700 CO-C1 

1710 GOTO 1740 

1720 CO-C1*100*BT4*FL127 

IF (FL=1)#(BT>8) THEN FL-3:GO0TO 1810 
IF Ci»5 THEN 1810 

IF Н(153<>0 THEN 1790 

1760 IF С1<>1 THEN 1790 

1770 PRINT "ナン ニモ 3174." 

1780 GOTO 1220 

1790 ON C1 GOSUB 1970,2370, 2510, 2620, 2980 


IF Ci=19 THEN 9750 
IF С1=20 THEN 9970 
1830 DL=ND 

IF NO»10 THEN 1870 


ЕЭ 
リス ト 中 すべ て の USR($0F14) 
ОЗА ($3E) に 変更 。 
以下 次 の 行 を 変更 し て くだ きい 。 


必要 あり ませ ん 


INPUT “>”; A$ 


必要 あり ませ ん 


IF ((М0<>5)%(С0<>5524)) *( (№0<>17) +(С0<>250)) THEN 1220 Y 


1850 ОМ NO 8DSUB 3100, 3600, 5820, 4440, 4740, 4930, 5120, 5350, 5450, 5860 


1860 GOTO 1880 


1870 ON NO-10 GOSUB 6050, 62640, 6480, 6720, 6820, 7070,7180, 7500, 7740, 8040 


1890 DATA "/", "А а Ж 
1900 GOTO 1220 

1910 PRINT "OK. "RETURN 
1920 USR($OF14):PRINT "27372," : RETURN 

1930 USR(SOF14) PRINT "Z3^7 アイ テ 492." t RETURN 
1940 USR($OF14) SPRINT "At" ñ 747492." t RETURN 
4950 USR(SOF14) PRINT "24° 3” — 3347432. "S RETURN 


270729. /“, "ж" 


94  onwz 1984.5. 


IF OL<>NO THEN RESTORE 1890: 60508 10550:С0-1:608УВ 1970 
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2910 DATA “гЯ-4! 7279. アリ スチ ャ フ 3" MIRY 47774% シマ ッ ク ソ "マコ /" 

2920 DATA "r$3"527' CPU ウフ 。 アリ スチ ャ ン リ ハリ チイ サワ ナリ スギ" +" 

2950 DATA "キミ ノ メ ニ 5177799 ダク ナン タコ /" 

2940 DATA "r343" 570 98994 9?"T-... /" 

2950 DATA "シカ シ ミエ ナ キ ャ クーー ム N YY ケラ レナ イナ ァ 。。 。。 コ ノリ 

2960 DATA "h 45055"  *$3-7T5-7?77"..../", "4" 

2970 GOTO 10660 

2980 REM% INVENTORY 

2990 IF Н(0) =0 THEN PRINT "ナニ モ tw?4t»."tRETURN 

5000 GOSUB 1080 

5010 PRINT "777 ^"; 

3020 E=0 

5050 FOR 1=16 TO 27 

3040 IF МІр%(4%,1,1)-"О" THEN 3070 

3050 E-E*1:IF E»1 THEN PRINT " К"; 

3060 PRINT " "$NA$(1,27-1); 

3070 NEXT 

3080 PRINT " 9 モッ テ 432." 

3090 RETURN 

3100 REM^*** SCENE 1 

3110 IF CD=7 THEN PRINT "アト ニ リ ) t'*Xrt2t»,.":tRETURN 

3120 IF С0=938 THEN 3210 

3130 IF С0=10135 THEN 3310 

3140 IF (CO-1304)*(CO*1404) THEN 3340 

3150 IF С0=1405 THEN 1960 

3160 IF C ロ =141 さ THEN 3410 

3170 IF С0=1706 THEN 5450 

5180 IF С0=1715 THEN 3500 

3190 GDTO 1920 - 
5200 REM “t y: 
3210 GOSUB 1060 

3220 IF МІр%Ф(А$, 27,1) ="0" THEN 1920 

3230 GOSUB 1910 EN 
3240 RESTORE 3250:808UB 10550 y 
3250 DATA "*e-----..../" 

5260 DATA "777 N マイ フロ 9?^427 フー ライ ノ オオ キサ Z ナッ テシマ イ " 

3270 DATA "シー ュー ズ / №99 ЕЭ モト" コカ I ト フ テ " イ ッ チ シマ イマ シク eo /", "а" 

3280 Н(1) =0 

5290 H(0)=H(0)-1 

5500 RETURN 

5510 REM^t* 

5520 IF (H(2)=3)%(H(1)=0) THEN NO=2: RETURN 

5550 GOTO 1920 

5540 КЕМ?% à 
5350 IF Н(2)<>0 THEN 1930 vistos 24448 
5580 GOSUB 1910 94 Р МИ un 
5570 H(2)=1 Сэ M AN rd 
338O PRINT "カー テン / 2972 "INA$(O,22)5" Ж PII" < 
5590 
5400 
3410 
3420 
3430 
3440 


TH(O。 1) =TH(O。 1) +8192 。 < まき Rr 
RETURN V 


REM “$ 
ON H(2)+1 BOTO 1920,1950,3430,1930 
H(2)=3 


GOTO 1910 irs Beh o 
3450 REM^t : sow 
3460 GOSUB 1060 | LU NAS 
3470 IF MID$(A$,22,1)2"O" THEN 1960 2 
3480 PRINT "At" 3" 9379559572." : a ionem 
3490 RETURN 

3500 REM 

3510 ON H(2)*1 BOTO 1920,3520,1940,1930 

3520 IF H(2)=2 THEN 1940 

BOSUB 1060 

IF MID$(4$,22,1)2"O" THEN 1950 

GOSUB 1910 

н‹2›=2 

PRINT "アイ クト ラ ン Z= 34^ 3" ネエ テレマ イマ シク 。" 

H(O)=H(0)-32 

RETURN 

REM ttt SCENE 2 

CO=6 THEN NO=5: RETURN 

IF TH(O。2)=O THEN 4710 

IF CD=7 THEN PRINT " ト オ ッ チキ ウ z^ / 57 D° キ エ テ ジ マッ チ th" UTR). "RETURN 

(С0=1008) *(H( さ ) =1) *(H(1) =O) THEN NO*3: RETURN 

IF CO=1416 THEN 3680 

IF CO=1612 THEN 3720 


HH 


š 
° 
8 
8 
8 


REM “$ 
IF H(3)=1 THEN 1930 

H( さ ) =1 

GOTO 1910 

REM” 

USR($OF14) 

RESTORE 3750:GOSUB 10550 

DATA "Fr ハー イ 39239! 29%" サッ! コ /" 

DATA "スル ト IIE Yo... /", "&" 

IF H(9)=1 THEN 3830 

H(9)=1 

GOSUB 10550 ; 

DATA “ГР? イイ トコ ロニ *#72U2, "YN エン トウ = TIDA 979% コマ ッ チ イル っ クー e" 

DATA "サン トカ ジテ ソレ 9 МУ 479" $4.4 h 497 イエ / ホウ 9 ユヒ "サジ チ 432./","&" 
RETURN 

RESTORE 3840:G08UB 10550 

DATA "rT2h*t 70277497“ 76.999 ñ AYD 94757 ,3/", "&" 

RETURN 


ШШ ЕН НЕНЕН: 
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REM^X** SCENE 3 

H(3)=2 

IF С0=640 THEN 4270 

IF CO-938 THEN 3940 

IF C ロ =11 さ 9 THEN 4100 

IF С0-1829 THEN 4210 

IF С0=2105 THEN 4510 

GOTO 1920 

REM^* 

GOSUB 1060 

IF МІ0Ф (АФ, 27,1) ="О" THEN 1920 

IF H(1)=1 ТНЕМ 4050 

RESTORE 5990: 6OSUB 10550 

DATA "гРР アノ ジョ ウジ ^ ョ 2” 477797 シマ ッ タ ゾ ソ " 。/ サ テハ アノ シー ュー ズ ヲ /29"T...2/ 
DATA "h 42073" アノ シド ュー スズ M チイ サフ ナル フス ズリ テ ャ シタ 。/ 

DATA “уыз 777 N チイ サワ ナリ スズ スネ" 了 テ ЖІ? 77797 ジマ ッ ク ノ テー シタ 。/ メ テー タ シ A$"95.","X«*" 
GOTO 10660 

BOSUB 1910 

H(1)=0 

RESTORE 4060:808UB 10550 

DATA "?79 Л th ノ MIF" / オオ キサ = モト "ルル コト т Ft." 
DATA "ソノ ジ ト ュー スズ JM? E.N オト モナ クワ ФІЎ 59(999,/","4" 
НО) =H(O) -1 

RETURN 

REM’ & 

GOSUB 1060 

IF МІр%(8%,26,1)-"О" THEN 1920 

IF H(13)90 THEN PRINT "Z22"54..." i RETURN 

BUSUB 1910 

RESTORE 4160: GOSUB 10550 

DATA "ミル ミル ウチ ニ 297 Ж オオ キワ 797 ^P イッ WW イニ ナッ チリ 
DATA "77°70 t う ウチワ モト "コカ へ EIF 094907, /", "Е" 

H( 1) =1 

H(O) =H(O) -6 

RETURN 

REM “$ 

GOSUB 1060 

IF MID$(A$,27-BT,1)-9"O" THEN 1920 

IF H(1 さ )=1 THEN PRINT "t9 ハマ w テ イマ ズ 。" RETURN 
H( 1 さ ) =1 

вата 1910 

REM “3 

IF H(1)=1 THEN 1920 

PRINT "FED ソト ^ FLIED" 

RETURN 

REM^t 

IF H(1)=1 THEN 1920 

GOSUB 1060 


IF MID$(A$,20,1)»"O" THEN 4380 

PRINT "イヴ ウノ マニ カ イエ Ж ソラ Z 792° 432." 
NO=4 

RETURN 

A=TH(1,3) 

GOSUB 1070 

Вө-"722" 

IF МІ0%(А%,20,12-"1" THEN ВФ-МАФ(1,7) 
PRINT "ナカ 2 ";jB$;" 2 979747 MUI" 


RETURN 

REM^*k*& SCENE 4 

IF (С0»2255)%(С0е1435)%(1/9-"Е") THEN 4490 
IF CO=1003 THEN NO= さ * RETURN 


GOSUB 1060 

IF MID$(A$,27-BT,1)-"O" THEN 1920 

IF H(14)=1 THEN 1930 

HCc14) 81 

GOTO 1910 

REM^* 

GOSUB 1050 

IF (H(14) 21) * (MID$(A$, 19,1) ="1") THEN 4610 
RESTORE 4590: GOSUB 10550 

DATA "し "メン = オチ テ 9” F シテ 227977 T9439594399./","8" 
GOTO 10560 

NO-2 


NO$(2)2"57*" / 4I / アッ クト コロ " 

RESTORE 4640:GO0S8UB 10550 

DATA "227 ЖУК” 3$"**959,/","/" 

DATA "O't" / 4I N トン テ " イッ ョ テ シマ イマ シタ 。/" 
DATA "29% t イエ 9 オイ カケ テト "コカ ^ イッ テシマ イマ シグ eo /" |" /" 
DATA "27 N トシ "テテ オキ マジ ョ ウッ ノリ ッ "ы" 
H(14)=0 

TH(O。 2) =O 

RETURN 

REM “t 

IF С0=7 THEN PRINT "th^L?t».":RETURN 
IF CO=é THEN NO-S:GOTO 1910 

REM^1** SCENE 5 

IF CO-6 THEN 4800 

IF CD=7 THEN NO=2: RETURN 

IF CO= さ 34 THEN 4840 

IF С0=2125 THEN NO-6:60TO 1860 

GOTO 1920 

REM^* 
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6710 RETURN 
REM^*** SCENE 14 
IF CO=6 THEN NO=16* RETURN 
IF С0=7 THEN PRINT "モウ th*LV?t».":RETURN 
IF (С0=1020) £(H( 5) =1 ) (HC 12) =0) THEN. NO=15: RETURN 
IF С0=1417 THEN 5780 
GOTO 1920 
REM^X 
IF H(é)=1 THEN 1930 
H(6) =1 
GOTO 1910 
REM^*&* SCENE 15 
IF (С0=640)#(Н(1) =0) THEN NO=14: RETURN 
IF С0«856 THEN 6870 
IF (CD=15 さ 7)+(CD=1621 ) THEN 6950 
GOTO 1920 
REM” $% 
IF H(16)=0 THEN 1920 
IF H(17)=0 THEN 6920 
PRINT "FLD ト ネッ シン = PAY? イチ WM» 9 *t(G2V3t5." 
RETURN 
PRINT "гушу 79697 トッ テモ アオ イカ ライ T/T ea" 
H(17)=1 
RETURN 
REM “$ 
USR($OF14) 
RESTORE 6980:G08UB 10550 
DATA "IDZA ファ ンカ ジマ セン カ ?74/","5" 
IF H(16)=1 THEN 6900 
GOSUB 10550 
DATA "гулум! tM) 7225 3^ オモ シロ イ PAR 9 T JO.) ト つり ます フェ ノリ 
DATA "губ" "7I Л Ы? 2 クシャミ 9 ズル カフ h*253^2 035743" 922.7) 47" 
DATA "2-2! ワケ ノワ カラ ナイ Ch... チカ トック うつ サ ネ "サン シク" コト 。 " 
DATA “PYR アタ マ W 497 Tw*O./","k" 
H( 16) =1 
RETURN 
REM^*** SCENE 16 
ДЕ CO=6 THEN PRINT "ココ 3 イキ トド マリ "Z "RETURN 
IF CO-7 THEN NO=14: RETURN 
IF (CO-1014)*(H(7)-1) THEN NO-17:RETURN 
IF CO-1418 THEN 7130 
GOTO 1920 
REM^t 
IF H(Z)=1 THEN 1930 
IF Н(1)-О THEN PRINT "F"? 3" オオ キス キモ ^ チ PILI 子 "キマ セン 。"sRETURN 
H(7)=1 
GOTO 1910 
КЕМ”%%% SCENE 17 
IF CO=230 THEN 7300 
IF С0=640 THEN NQ=1&:RETURN 
IF (CO=1O22) *(H( 日 ) = さ ) #(H(1) =0) THEN NO=18: RETURN 
IF CO-1330 THEN 7250 
IF CO-1422 THEN 7400 
IF С0=1722 THEN 7440 
GOTO 1920 
REM “t 
A=TH( 1, 17) BODSUB 1070 
IF MID$(A%,27-BT,1)="O" THEN PRINT “ソン ナ モ ノ ñ 2е-7%%-.": RETURN 
GOSUB 1910 
IF H(8)=1 THEN RETURN 
RESTORE 7320: GOSUB 10550 
DATA "74! コン ナ ト コ ロニ ","%" 
PRINT NA$(0,22); 
GOSUB 10550 
DATA " 2" 7?745-!!/" 
DATA " シカ シ TIF コン ナ ト コ ロニ P Ж アル ン テ " ショー ネー! アリ ス PIIA 4?9-4/1/", "8" 
77370 H(8)=1 
7580 ТН(0,17) «ТН(0,17) %4194304 
ВЕТИВМ 


ЧЫНЫНЫ ЕЕН ТЫННЫ НН НЕНҮНЕ 


7400 REM’# 
7410 ОМ Н(8)%1 GOTO 1920,1950, 7420,1930 
7420 H(B)= さ 


7450 ОМ H(8)*1 GOTO 1920,7460,1940, 1930 

7460 GOSUB 1060 

7470 IF МІр%$(А$, 22,1) ="0" THEN 1960 

7480 H(8)22 

7490 GOTO 1910 

7500 REM^*t* SCENE 18 

7510 IF С0-1626 THEN 7560 

7520 IF (С0=2424) #(Н(18) =1) THEN 7650 

7530 IF CO-6 THEN PRINT "h"2 ^ 42/2 7*»574."1RETURN 
7540 IF С0=7 THEN PRINT " ト ~ コカ ラキ モタ ンカ ワ ス レ テ シマ イマ シタ 。"sRETURN 
7550 60Т0 1920 

7560 REM “t 

7570 IF H(18)=1 THEN PRINT "スミ 7 いや カケ ラ レ マ シタ 。"sRETURN 
7580 RESTORE 7590:GOSUB 10550 

7590 DATA “7 21r EYD) ?3/" 

7800 DATA "?Уул:г?.?? R FR F F RI. アフ サン トコ ハト "ナイ チャ ズ スカ 747" 
7510 DATA "9 コ 』F ソ フト ノ WPI OY 43^... グ カ ラ ヒ " ル アト "へ" フン チャー © ヨロ シフ 。/" 
7620 DATA " Th"h 44775 92 ^ PUI" ото", "ы" 

7630 H(1B)=1 

7640 RETURN 

7650 REM^* 
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7660 RESTORE 7670:605UB 10550 

7670 DATA " тал кок» アル シイ テ ユネ マス 。/" 

76BO DATA "オフ レナ イ ヨ ウ ニ AYE アシ %7 ツイ テイ キマ ス 。/" 

7690 DATA " キ カ " リフ ト 49/22 モリ 7 ソト 2 FF イマ シタ 。/" 

7700 DATA "PIY イチ メラ オリ ナハ "タケ $^ ダコ л IDZ 1970917096", "ж" 
7710 PRINT 

7720 МО=19 

7730 RETURN 

7740 REM^*** SCENE 19 

7750 IF С0=6 THEN GOSUB 1910:PRINT "アレ ッ ! サッ キト 42727 iY a5"! ! "t RETURN 
7760 IF (С0=15357) +(C ロ =1609) +(C ロ =1611) THEN 7780 

7770 GOTO 1920 

7780 REM t 

7790 IF H(1)=O THEN 8020 

7800 RESTORE 7810:GOSUB 10550 

7810 DATA "r3.22-*7...7/wWwa ?УЛФту FED アカ "ッッ テ イマ スズ プリッ "まい 
7820 IF H(12)=1 THEN GOSUB 105501:RETURN 

7830 DATA "モウ アイ テニ 9329V3?t53"^2. 3754..../","3»" 

7840 Н(12) =1 

7850 RESTORE 7860:605МВ 10550 

7880 DATA “г?-у! ミカ クナイ カオ クタ "ナー コト T99.r*ÀR N 72742 Ттт?“ 23/7" 
7870 DATA "727 キ カ レ チ 492.22» コタ エキ 445822" ヨ サ ソウ $"z99/","4" 


7890 必要 あり ませ ん 


7900 FOR 1=0 ТО 2000:NEXT 

7910 IF (LU$2"J")3(A$«"7JZ") *£(A$-"ALICE") THEN 7960 

7920 GOSUB 10550 2: 
7950 DATA "гуу ソウ イエ N" V29"-97. FATO キオ ワリ ョ の 2° 3%97-! Pyh!" 1 
7940 DATA " ナン ト ! 5" ЭҺ IFA エラ レ チ 094709, /", "Е" z 
7950 RETURN 

7960 RESTORE 7970:808UB 10550 

7970 DATA "г?>-у! Уо? マト モナ TI / モノ N ジラ ナイ ナー。 チョ ッ ト イッ ジョ ニ キク マエ 。 コ " 
7980 DATA “h 497 tw)*5L* 4%?у9. コノ オオ サマ ロリ コン テー 749 әа-%-..../, "Е" 
7990 ND=2O 

8000 RETURN 

8010 REM^* 

8020 PRINT "252" 3" チイ サイ ノ テ ^ tty キ カ " ツ カナ イ IIF R." 

8030 RETURN 

8040 КЕМ”%%% SCENE 20 

8050 IF С0<>1809 THEN 1920 

8060 RESTORE 8070:808UB 10550 

8070 DATA "F... RRI ソウ スル ト AIIN コノ クニ ノ 9"39&)$" À T4770" T. 2/" 

BOBO DATA "rriI ソウ ナノ 。 ウ サキ "サン F オイ カケ テキ タラ イヴ ウノ マニ カ ココ へ キテ シマ ッ ク フ ンチ" ズ 。 ト " つ ヤ ッ ク う " 
8090 DATA "オウ チ へ カエ レル ノ カ オシ エ テ ワ レナ イカ シラ 。" 

8100 DATA "オチ ャ ノ シ " カ ラニ オク ワレ ルト オカ アサ マニ ジ カ ラ レ チ ャ ウェ ュ /" 

8110 DATA "r5-» ワシ ニハ 3722923522" ワシ ノ ト コロ ニハ" 

8120 DATA " モノ ヲ ヨ フ シッ テイ ル モノ ンカ" イル カラ ソイ ウツ ニ *45x55," 

8130 DATA "オイ OTOMIHSAH 9 325^24.4/" 

8140 DATA "гязЕ" 7° ジョ ウ カ 。 コ /" 

8150 DATA "r コ ノコ 2° ウチ ニカ エル ニハ Һ ウリ タラ 34/2 オシ エ テ ヤッ テウ レ 。 コ ュ /" 

8150 DATA "гУУҒА ^Tt" YIL N tt? 2 の ジャ ミ F ALD o" 

8170 DATA "コノ ナゾ "ナゾ ~ ニ コタ エラ レク タラ オマ エ ノ スン テ " イク や カイ へ カエ ルミ チラ オジ エ テ ヤ ロウ ェ コ ノッ リ ポリ 
8180 INPUT "39IN ";А% 

8190 В%="" 

8200 FDR Ізгі TO LEN(A$) 

8210 IF МІр%(4%,1,1)<>" " THEN В%-В%%М10%(49,1,1) 

8220 МЕХТ 

8230 IF 日 本 =" ツキ カ ^ トッ テモ アオ イカ ラ " THEN 8320 

8240 RESTORE 8250:G08UB 10550 

8250 DATA "гї" 5453" 07.60 シラ ナイ 。 コ /" 

8250 DATA "h,400»75" PYR チャ ン N ウチ へ カエ レナ ワウ ナッ テ ジ マ イ ソレ ラミ クラ オオ サマ リハ" 

8270 DATA "カワ イソ ウニ オモ ッ チ PYR 9 オシ ロ ノ море - シテ ワレ マシ グ 。/" 

8280 DATA " モト モト アリ スハ ле シラ ヲ ヤ クノ カ " 2*9*549,3^ N ン ラ ヤキ ナカ 5 シア ワ セ ニ ワラ シマ シゲ 。/" - 
8290 DATA "コノ ハ / ハナ ジコ ^ エ 2 ギコ エル ヨウ ナ サミ シイ ヨル с PYR N オカ アサ マ P オネエ サマ /" 
8500 DATA "コト 9 オモ イク "シテ Yab 757” 9 ナカ 2/3799. /","&" 

8510 BOTO 10660 

8320 RESTORE 8330:G08UB 10550 

8330 DATA "гЯЯ??у! УҒА ЖЕ; 9%) マエ マテ ^ 1797497 75*55.295^ *7T74.2/" 
8340 DATA "アリ ス ñ Yz ОТОМІНЗАН = "47 ユキ マリ ラズ ルト トウ セン ЯМЯ/ ノ ヨウ ナ " 
8350 DATA "E/N カフ "サッ チキ マリ ケ 。DTDMTHSAH リト "フト ドン "ЖАК イッ キシ マウ 73^ " 
8360 DATA "Fr マッ テーー! 」 ト 557"; FAN 01719772. 

8370 DATA "ダァ ンタ トン マ ワ リ ノ クウ モカ" ウス レ チ ュ フ ヨ ウニ аә" 7 /", "8" 

8380 PRINT 

B390 REM^*1** FINAL 

8400 FOR І-о TO 8201:NEXT 

8410 RESTORE 8420:G08UB 10550 

8420 DATA " PYR N F`? х ウエ ^ オネエ サフ / t" І アウ マラ ノ セ テ 3349 Уш" 
8430 DATA "#2" リキ マシ ケラ 。 オネエ サー N PYR / 25/99 PID T3"34399./" 

8440 DATA "オキ ナ サ イ アリ ス ! 」 オ ネエ サン 3" ミミ モト 了 テ " ササ ヤキ マズ c「 ホ フト ウニ 37 ネム タワ ネェ 1 コ /" 
8450 DATA "r? オネエ サン 。 ワ ウシ トゥ テモ オカ シナ ユメ 9 29/1!" 

8460 DATA "27+" 92 3" 45 オオ サマ P ジョ オウ サマ 37 4$4....","/" 

8470 DATA " PYR N Уон オネエ サン = ATAT ELI Y t4 4 イマ マテ ・ ニ " 

8480 DATA " ライ ケン 99 カノ ジ " ョ ノ フレキ" ナ RIII / WT» F YF *3t9,/3^72."," /" 
8490 DATA " PYR 27 パナ シオ ワル ^ オネエ サン n カノ ジョ с キス シテ イイ マシ タラ 。/" 

8500 DATA “"r ホ ント ウニ フシ キナ 177 49% 9% モウ イソ イ テ " オチ ャ = AETIA." 

8510 DATA " モウ яУ2....1/" 

DATA " ул” オネエ サフ N INY 9 20747209," 

DATA " PYR M ソノ オネエ サン / ヒキ リク 249 5% 48722" 2009 2U3IU395,/" 
DATA "ナント ソコ ニハ オオ キナ ジロ フシ" ラ Ж 2539 АА? 79 フッ チ 4W$9^ 

DATA "アリ マセ ンカ ! ! уу? ユック リト 799 ヒラ イチ 2044999,./","/" 

DATA " [イッ ショ = 90° с ў" УРУЛ? Ју", "ж" 

PRINT 

FOR ІзО TO 6001:МЕХТ i 
GOSUB 10550 > 
DATA "コン フト" ñ P77 27 ADVENTURE 3 928 Ny $"29!|","3" 


ШЕНІНЕ 
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REM^*** INIT 
CONSOLE S 0,24:CONSOLE C 40:РАІМТ CHR$(6) 一 一 8630 CONSOLE o a 0, 40: согон 
PRINT CHR$(&6) 

DIM NAà$(1,26),UVR$(25) , MAS (20) ,CHCAD) , TAC26) ,HC21) 

DIM TR$(1,26),FM$(35) , THC 1, 20) ,NO$(20) ,A$(25) 


8680 PRINT:PRINT "て (1) ニホン コ ^ (カタカナ) (ODr4mr" 


8810 
8820 


ЧЫНЫН Н. 


PH 


TE 
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РБІМТІРБІМТ " 1 924 2 7 2?” 9? "972?" 97." Жы 
PRINT:PRINT " "s ақы? 
GET A$:1F A$="" THEN 8710 

IF (A$4»"1")*(A$4»"2") THEN 8710 

IF A$-"1" THEN LUS-"J":PRINT "-X&»3"":GO0TO 8940 
LU$="E":PRINT "142°" :RESTORE 8780 

FOR 1=1 TO 24 

READ VR$(CI) 

NEXT 

DATA LOOK, TAKE, THROW, EAT, INVENTORY 。 GO, BACK, ASK, DRINK 

DATA ENTER, FAN, GIVE, MOVE, OPEN, SAY, TALK, UNLOCK, WEAR 

DATA SAVE, LOAD, CLIMB, OPEN, JUMP, CLOSE , DOWN, FOLLOW 

FOR 1-0 TO 26 

READ NA$(CO, I) 

NEXT 

DATA BUTLER; САТ, САТАР ILLAR, CHIMNEY , CURTAIN, DOG, DOOR, DRESSER, HOUSE 
DATA KING,MARCHIONESS, QUEEN, RABBIT, SMALL DOOR, STORE, TABLE 
DATA DOOR; DOOR; DOOR, HOUSE, HOUSE, RABBIT, SMALL DOOR, TREE; WALL. 
DATA TREE, TAKO 

FOR I-O TO 14 

READ NA$(1, I) 

NEXT 

вата 9120 

DATA BOTTLE, FAN, GLOVE, HAT , HATCHET» KEY, MUSHROOM, STICK; PARASOL 
DATA ANSWER, HELLO, JUICE, MYSELF , QUT, EYE 

RESTORE 8980 

FOR 1=1 TO 26 

READ VR$(CI) 

NEXT 

рата ミル ュ ト ル ょ ナク ケル 。 9^" ル 。 EFE, 42, モト ~ ル 。 キ フェ ノム 

рата Mbs PAT” ,75* &,22* 22,778, 40, ЛГА, DE PINS V, セーフ” , ロー ト ~ 
DATA ж", A, КЕ" TUN, PST ルッ オリ ルッ > ヴイ ティ イワ 

FOR I=0 TO 26 

READ NA%(O, I) 

NEXT 

DATA :/7;",Ж2,4%49,І>Һ7,2-%7,4Я,һМ Ps キョ ウタ "イッ イエ 

DATA オウ サマ 。 コウ シャ フフ ジ * ン ュ ショ オウ 。 IIE 。 チ イサ イト ^ 7,80, テーブ” ル 

DATA h*7?,h" Y, b" P, 4I, 4I, 0 1'*" 。 チ イサ イト ~ 7,*,3^^ 。 キュ ダコ 

FOR I=0 TO 14 

READ NA$(1,1) 

NEXT 

DATA Е”;,2%2,%72"70,Ж29,4/,2%7,%/2,472,/У ラ ソ ル 

DATA コタ エ 。 コ ン ニ チワ 。 シ "ュー ズ ュ ジ ” フー ファ ФЕР, Л 

RESTORE 9160 

FOR 1=0 TQ 55 

READ FM$( I) 

NEXT 

DATA ハン フフ サカナ 7 28229 994: RF スワ ッ テ チイ ル ОА ノ 

DATA 347" nth "5 ^ ヨウ ナ 。 ア カイ レン フカ "ヴァ ワリ 7,949" T スカ イフ "ルー ノ 

DATA マッ シロ ナ マル w ッ コイ 。 キテ" $"*9 カ " ン ジョ ウ ソウ ナッ スコ ジ オオ キイ 754 ノ 

DATA シャ レク チイ サナ 。 ケ ワサ ン / 554 9 ヒキ リウ レタ 

DATA 657797 $^ チ " に"~ ルフ イー つ / ヨウ ナ 。 セ D 909% 99994 

DATA мл“ メカ " ネ 9 カケ カイ チュ ウト "ケイ 7 モ ョ グ 。5 イ ンチ БАН の "ライ ノ 

DATA ト " ウ ヤラ う ホホ "ウシ ヤ ノ ヨウ ナ 。 ウ ツク シワ スキ ネト オッ クタ N IR ノッ シャ レタ 929 / 

DATA 272 7,Лу1224 F YP, Јуле т リフ リラ 99 

DATA 29%" / җа 7 ヨウ ナ エン トリ / クッ テイ b>3 カ "ウツ O'"f*^ ト mv vt 

DATA ミク コト / PLIIT, IDA モミ /, 8293" t 997 や "フイ ロ ノッ フト イ I?" 7,93 / 
DATA 547% Z rDrink mels h カイ テア ル ジ ド ュー ズ 7 ІМ"? 

DATA HUDSON つ ウチワ (ジル ヒト ソリ" シル ) ニ 27292 Т» / "Ww / 

DATA つ サ キ ^ ヨウ 2 アナ ノ Y49,th ñ アカン まま "ウノ RAF 9 シテ イタ ブフ リキ" ナ 。 キ フイ ロ ノ 
DATA マリ タケ 2 リフ リナ 。 ミ フン キーズ ステ ウキ B> ソック リナ 。 ジ ロイ 

FOR 1=O TO 26 

READ TR$(O, I) 

NEXT 

DATA 00%,01%,02%,05107%,04%,05%,06%,07100102%,08%,09%,10%,11% 
DATA 12%,15%,14%,15100105%,106%,17%,18105%,19%,20%,21%,22% 
DATA 25%,24%,25%.,26% 

FOR I-0 TO 9 

READ TR$(1,I) 

NEXT 

DATA 27*,28*,29*,30*,31*,32*, SIF, 54*, SSF, 36* 

FOR 1=1 TO 20 

READ TH(O,I?,TH(1, I) 

NEXT 

DATA 32848, 0, 29888,0, 136, 2,8, O, 33554464, O, O, 256,4, 64 

DATA 524555,0, 25165824, O, O, O, 1024, O, 2,0,0, 0,1179648, 0 

DATA 2097152,0, 278528, O, 0,8, 67108864, 0, 2560,0, 2560, 0 

FOR Ізі TO 20 

READ NO$(1) 

NEXT 

DATA ヒロ イ ホ ー ル 。 ウ の サキ" / イエ / II DIE / イエ ノ TAIE 7 4I РЖ и ウエ 
DATA モリ ノ ナカ 。 キ / ウエ 。 モ リ / スコ シ 6579 トコ ロ 

DATA モリ 9 テ " タ トコ ロ = アル コウ シャ クワ フシ "ラノ イエ / ?І,5л7?25 / ЖАУ 

DATA ミス "ウミ / ЖМ) ш アル キノ ウエ 。 ナ へ " P フラ イハ リッ ン Z ト に "カウ イエ ノ ナカ 
DATA シャー ウト" / tU ノ IT F, mY ト シタ tU ノ ナカ 

DATA 9/0 III / イエ / マエ 。 オ チャ カイ / サイ チュ ウ / IID IITE / イエ / ナカ 
DATA オオ キナ キリ カフ " ノ 29% 9 シク RYP / I,W ОР 7 9274 

DATA 22947 х ナカ 。 キ レイ ナ オリ ハナ 2° 52792 サイ テイ ル オハ ナル "タケ 


1 ‚6,0 
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マン シン 語 


ジャ ンプ 命令 と は , 指定 し た 番地 に プロ 
グラ ム の 実行 を 移す 命令 で す 。BASIC 語 


言え ば,「GOTO」 文 に 相当 し ます 。 
この 命令 の 種類 と 動作 は , リス ト の と お 
Жай ұй 


ik: リス ト の 注釈 欄 に 「REN」 と いう 変数 を 
使用 し て いま す 。 こ れ は , その 機械 語 命令 
が 書き 込ま れ て いる メモ リ の 番地 を 意味 し 
iT. 


絶対 番地 指定 と 相対 番地 指定 
ジャ ンプ 命令 に は , 絶対 番地 指定 (JP) 
と 相対 番地 指定 (JR) の 2 種類 が あり ます 。 
@ 絶対 番地 指定 
ジャ ンプ 先 を 直接 指定 し ます 。 つ まり , 
JP nn 
は , 「nn 番 地 に ジャ ンプ する 」, 言い 換え れ 
Ж, 「nn 番 地 か ら 書 き 込 まれ て いる 命令 を 実 
行 す る 」 と いう 意味 に な り ま す 。 
また だ , nnli '0000H—FFFFH, O E O fü 
も 取り うる の で , と どの 番地 へ も ジャ ンプ す 
る こと が で きま す 。 
人 @ 相 対 番地 指定 
ジャ ンプ 先 を 相対 指定 し ます 。 つ まり . 
JR e 
は ,「 こ の 命令 が 書き 込ま れ て いる 番地 に e 
を 加 ぇ た 番地 ヘ へ ジ ャ ンプ する 」 と いう 5 意味 
に な り ま す 。 
た だ し , e は 「 一 126 一 十 129」 の 値 し か 取 
D BOOT, JR 命令 が 書き 込ま れ て いる 
番地 か ら 一 126 よ り 小 さい 番地 と 十 129 よ り 
大 き な 番 地 へ は ジャ ンプ で きま せん 。 を その 
か わり , JP 命令 より も 命令 の 長き が 1 バイ 
ト 短 い し , リロ ケー タブ プル な プロ グラ ム も 
作る こと が で きま す 。 
ЕЕ”, 
JR е 
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"es A 


基礎 編 「 ジ ャ ンプ 命令 


図 1 JR 命令 の 実行 


“кеткен Ninian” r- TERE | 7 


アセ ンプ リ 語 
JR д 


メモ リ の 番地 
7000H 


機械 語 
18 0E 


・ 以 上 の よう に , ② の 段階 で PC に は すでに 
t, 機械 語 に する と き は 「e 一 2」 と し な く 


を 機械 語 に 直す と き は , 
18, e 一 2 
と し て 《 だ さい 。 

と いう の は , アモ ンプ リ 語 で は ジャ ンプ 先 
が わか りや すい よう に , 「JR 命 令 が 書き 込 
まれ て いる 番地 」 を 基準 に し て , 「e」 だ け 
ジャ ング する よう に 考え て あり ます が , 機 
械 語 で は ,「 次 の 命令 が 書き 込ま れ て いる 番 
地 」 を 基準 に し て ジャ ンプ する よう に な っ 
て いる か ら で す 。 つま り ,「e」 か ら JR 命 令 
の 長き る で ある 「2 」 を 引か な く 《 て は な ら な 
いと か ラブ る も で て すら 
詳細 は , 図 1 を 見 て くだ きい 。 

注 : リス ト を 見 て の と お り , 

JR Ж e 
の 「 条 件 」 に は , 「 ゼ ロ ・ フ ラグ 」 と 「 キ ャ リー 
・ フ ラグ 」 し か 使え ませ ん 。 


無 条件 ジャ ンプ 命令 と 条件 付 ジ ャ ンプ 命令 
@ 無 条件 ジャ ンプ 命令 

JP nn 

JR e 
の よう に , 条件 が 付い て いな い ジ ャ ンプ 命 
令 の こと で す 。 言う まで も な く , この 命令 


を 実行 する кӨне vr i. 


@ 条 件 付 ジ ャ ンプ 命令 

JP 条件 , nn 

JR Же 
の よう に , 条件 が 付い て いる ジャ ンプ 命令 
の こと で す 。 つまり, 条件 が 満た され て い 
れ ば ジャ ンプ し て , そう で な いと き は な に 
も し な いで 次 の 命令 を 実行 し ます 。 BASIC 
語 で 言え ば , ПЕ 条件 GOTO~」 に 相当 
122952 

ここ で 言う 「 条 件 」 は , フラ グ の 状態 の 
こと で , 次 の よう な 種類 が あり ます 。 


条件 フラ グ の 状態 
NZ ゼロ ・ フ ラグ が リセ ッ ト 2-0 
Z ゼロ ・ フ ラグ が セッ ト 7-і 


NC キャ リー・ フ ラグ が リセ ッ ト CY-0 
С キャ リー・ フ ラグ が セッ ト CY=1 
РО PV・ フ ラグ が リャ セット P/V=0 


РЕ P ノ V・ フ ラグ が セッ ト PV ニ 1 
Р サイ ン ・ フ ラグ が リセ モット 5-0 
М サイ ン ・ フ ラグ が セッ トド 5-1 
その 他 の ジャ ンプ 命令 
JP (HL) 


JP (IX) 
JP (IY) 
レジ スタ ・ ペ ア HL や , イン デック ス ・ レ シレ 
ジス タ IX, IY の 内 容 が . その まま ジャ ンプ 
先 に な り ま す 。 だ た と えば 
НІ,-- АВООН 
の と き に , 
JP (HL) 
を 実行 する と , ABOOH 番 地 へ ジャ ンプ し ま 
す 。 
@DJNZ е 
一 種 の 条件 付 ジ ャ ンプ 命令 で す 。 レ ジス 
タ B の 内 容 を 1 だ け 減 じ て , も し 「B デ 00 
H」 な ら ば 相対 的 に e だ け ジ ャ ンプ し て , 
「Bー00H」 な ら ば , その 次 の 命令 を 実行 し 
2d. 
この 命令 を 他 の 命令 で 表わす と , KOZ 
うに が な り ま す 。 
DEC B 
JR NZ, е 
と ころ で , 同じ ゲロ グラ ム を 決め られ た 
回 数 だ け 実 行 する 場合 は ,「DJNZ」 命令 を 
使用 する と 便利 で す 。 た と えば , 次 の よう 
に 使用 し ます 。 


LP01 : ENT 
PUSH BC 


POP BC 
DJNZ ІРО 
) 
これ は ,「 プ ログ ラム A」 を x 回 実行 する 
プロ グラ ム で す (š :xH=00H~FFH, た 
だ し , xH= ニ 00H の と き は ,「 プ ログ ラム A」 
を 256 回 実行 し ます )。 
①② の 「PUSH・POP」 命令 は , レジ ス 
タ B の 内 容 が 壊れ し な いよ うに する た めで す 。 
し か し ,「 プ ログ ラム A」 中 で レジ スタ B の 
内 容 が 壊れ な いこ と が わか っ て いれ ば , © 
② は 必要 あり ませ ん 。 ま た だ た ,「 プ ログ ラム A」 
mc, 
POP BC 
LD B, 01H 
PUSH BC 
を 実行 する と ,「 プ ログ ラム A」 を x 回 実行 
し て いな く て も , ルー プ を 抜け 出す こと が 
で きま す 。 ①② が 省略 され て いる と き は , 


DEUS EX 


МАСНІМА 


LD В, 01H 
と する だ け で , ルー プ を 抜け 出す こと が で 
きま す 。 


PROGRAM 1 

BASIC 語 の 「ON 一 GOTO 一 」 文 に 相当 
する プロ グラ ム で す 。 レジスタ A に , ある 
値 を 代入 する こと に よっ て , あら か じ め 決 
め ら れ た 番地 に ジャ ンプ する こと が で きま す 。 

この プロ グラ ム で は 。 た だ た と えば ,。 А--00 
H な ら ば 2000H 番 地 に ジャ ンプ ', А=07Н 
な ら ば 3AFFH 番 地 に ジャ ンプ する こと が で 
きま す 。 

5055, 「TAB01」 以 下 の デ ー タ を 変え 
る こと に よっ て , その 他 の 番地 に も ジャ ン 
プ 可 能 な プロ グラ ム を 作る こと が で きま す 。 
解説 

10fTH~ 「A>07 有 HH」 な ら ば ,「LP01」 
OUTLET ZL TT 
AB01」 以 下 の ジ ャ ンプ 先 デ ー 
タ の 数 を 変え た た と き は , 

CP「 ジ ャ ンプ 先 デ ー タ の 数 」 
に な る よう に し て くだ きい 。 
еси, 

CP 08H 
で すず 。 
レジ スタ ・ ペ ア HL に , ジャ ン 
プ 先 の デー タ を 代入 し ます 。 
だ と えば 。 

А--03Н 
な ら ば , 

DE=0003H 
に な り , 

IX メーAO1CH 
と な る の で , 結局 

НІ,--3200Н 
と な り ま す 。 
レジ スタ ・ ペ ア HL が 示す 番地 
に ジャ ンプ し ます 。 


19178 ~ 


ジャ ンプ 先 の テー ブル で す 。 


21 行 目 一 

3MTH— 「A>08H」 な ら ば , ここ ヘ へ ジ 
キジ シレ ます 。 

PROGRAM 2 


初 項 1 公差 1, Fn の 等 差 数 列 の 和 
S を 求め る プロ グラ ム で す 。 簡 単に 言え ば , 
n を 与え て 

S= テ 1 十 2 十 3 二 …… +n 
D, S を 求め る プロ グラ ム で す 。 

A00CH 番 地 (DATA01) に n の 値 を 代入 
し て この サ プ ル ー チ ン を 実行 する と, SO 
値 が A00DH 番 地 (DATA02) に 代入 され ま 
Fe KEA 

(A00CH) = 07H 
に し て , この サブ ルー チン を 実行 する と , 
(A00DH) = ІСН (01H--02H--03H-- 04H 
-05H--06H--07H—1CH) (272 0 & T, 

た だ し ,「S>FEFH」 に な る 場合 は 。 オ ー 
バー・ フ ロー の た だ ため, 正解 は 得 ら れ ま せん 。 
解説 

101798— レジ スタ B に , (DATA01) の 
値 を 代入 する 。 そして, レジ 
スタ A の 内 容 を クリ ア し ます 。 
レジ スタ A に , レジ スタ B の 
内 容 を 加算 し ます 。 こ の ルー 
プ 内 で は , レジ スタ B の 内 容 
Dî, 

n, п-1, п-2, veda ee (4 2 1 
と いう よう に , ひと つ 減 っ て 
いく こと に 注意 し て (だ きい 。 
(DATA02) に 。 レジ スタ A の 
内 容 を 書き 込ん で , リサ リターン 
し ます 。 


あと が き 
次 回 は , 基礎 編 「 コ ユー ル ・ リ ター ン 命 令 。 
入力 ・ 出 力 命令 」 を 予定 し て いま す 。 基 礎 
編 は 次 回 で 最終 回 に な り ま す 。 
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EE з — 


а јав ж CAS сөн CAS cam can cun 


C33412 ^4234H . 
C23412 ы AN > М2, i1234H 
БАРИА BI RT 2,1234H 
D23412 Sa pau D S а — NC, 1234H ` 
раз412 ; = - C,1234H 
Е25412 NS d POs 1234H ` 
БАФТА o0 i PE, 1234H 
F23412 EEE P, 1234H 
FA3412 kis T ta лы M, 1234H 


вото 12зн 0 
IF 2-0 GOTO 1234H 
IF 2-1 GDTO 1234H 
IF СҮ-о GOTO 12 さ 4H 
IF CY=1 GOTO 1234H 
IF P/V=0 GOTO 1234H 
IF P/V=1 GOTO 1234H 
IF 5=0 GOTO 1234H . 
IF 85-і GOTO 1234H 


LENSES аз ә сат 


GOTO REN*12H 

IF 250 GOTO REN+12H 
IF Z-1 GOTO REN+12H 
“IF CY=0 GOTO REN+12H 
IF CY=1 GOTO KEN+12H 


1810. КЖ е c ucc URS БАДЕН 
2010 UE E LEE бард 22 NZs12H 
2810 eh RTI ARX тала ーー 72,12Н 
3010 SEO" сау a NC。12H ` 
3810 VASE EE C» 12H 


Eş E E тана а RE GOTO (HL) 
ВЕЗИ “е ее иу ра ӨТӨЛҮК: 
FDE? 0 JE Рр АСЫ ocius av 


1OEC —— орам? -12 dps (4 Back wu 4 


AE: B>o cara REN-12H 


ORG $4000 
IF А<ОВН ELSE CY-O 
IF CY=Q вото ШРО1 
Е=а а еріс š 

š D-00H 

$ IX=TABOL 
 IX=IX+DE 

$ IX=IX+DE | 
 L=(IX+OOH) 

 H=(IX+O1H) ` 
вото (HO — 


PROGRAM 2 


ЖЖ 780 ASSEMBLER SF—2102 PAGE 01 жж 


PROGRAM 2 


(D&TO2)-01H*O2H*...-(DATO1) 。 — ^ 


i£. cat cua Cas w Cal an 


_ BOOOH s ORG $6000 


A, CDATO1) s А-(рАТО1) 
s B=A=(DATQ1) 
A-OOH 


% ñ=ñn+E : 
; B-B-1:1F B>O GOTO LPG 
з2орао (DATOZ), ñ (DATO2)=ñ | 


C9 s RETURN 


; 
DATO1: 
DATO2: 
š 


Ы 


実績 / 教 材 / 講 師 陣 ナン バー1 を 誇る ! 


шар ЕЕ FE 
@ 昭 和 59 年 度 第 20 期 生 受 付 中 / 統計 官 (主事 ) 資 格 か が 取れ る 。 


@ 唯 一 の 文部 省 認 定 / 行 政 管理 庁 指定 / 通 信 講 座 
@ 執筆 ・ 指 導 = 上 智 大 教授 ・ 理 博 斎藤 金 一 郎 
前 東京 大 教授 ・ 理 博 奥野 忠一 
千葉 大 教授 ・ 理 博 浅井 晃 

慶応 大 講師 ・ 工 博 芳賀 敏郎 0 
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çs 


2 


E 
ш Әз ШЕ да+ 


89% ل‎ 9% 
ЕТЕ 
EE 


eo o 
ятуы Өг о > 
mds c6 m 


УІ 32 oF 

3838 3 EE RE 
پد وډه‎ O; Q + G IN — 
1E E: E JE HEE g E: JE: 
ell al alt di di الج‎ dl dll 
M H I U U H H 1 


ЖЕЗ; 
品質 管理 と 実験 計画 


馬 実 務 教 育 研究 所 公開 講座 統計 部 


160 東京 都 新宿 区 大 京町 4 の 383 人 東京 〇 3(③57)8153 


М2-2000/2000 


マシ ン 語 に 挑戦 し よう ./ 


BASIC 文 字 列 サー チ ・ ツ ー ル 


は じ め に 

マシ ン 語 の 文字 コー ド 列 を 探す プロ グラ 
ム を 本 誌 "83 年 6 月 号 で 紹介 し まし た 。 AM, 
BASIC テ キス ト 内 の 任意 の 文字 列 を 探す 


プロ グラ ム を 作り まし た の で ご 紹介 し ます 。 


BASIC プロ グラ ム の 修正 や 分 析 に 役立つ 
か と 思い ます 。 


1. 特 長 


BASIC テキ スト 内 の 文字 列 を サー チ す 
る 場合 , BASIC プロ グラ ム は 中 間 コ ー ド 
に 変換 きれ て いる た め , 普通 の 16 進 コー ド 
の サー チ と は 違っ て 中 間 コ ー ド を も と の ス 
テー トメ ント に 戻し て か ら サ ー チ す る 必要 
が あり ます 。 そこ で , この 変換 に は BASIC 
イン タプ リタ の ルー チン を 利用 し まし た 。 
操作 性 が 良く な る よう に 特に 次 の 点 を 工夫 
し て あり ます 。 

(1) 指定 し た 文字 列 を 含む BASIC プ ブロ グラ 
ム の 行 を 探し 出す と , その 行 を 1 行 分 だ 
け 表 示し て BASIC イ ンタ プ ブリタ に 制御 を 
戻し ます 。 し た が っ て , 普通 の テキ スト 
修正 と 同じ よう に た だ ち に スク リー ン ・ 
エ デ ォ ッ ト が 可能 で す 。 

(2) 指定 し た 文字 列 を 含む 行 が 複数 個 あ る 
場合 , F10| キー を 押す と 1 行 ご と に 順次 
サー チ を 繰り 返し て 表示 し ます 。 

(3) 新しい 文字 列 を 指定 し た い 場 合 は , 
[F9] キー を 押す と サー チ 文 字 列 の 入力 モ 
ー ド に な り ま す 。 

(4) 空白 (SPACE) の 文字 に つい て は , サ 
ー チ の 対象 か の ら は ず し て 無視 する よう に 
し まし た 。 BASIC プ ログ ラム の 実行 時 も 
無視 8 れる か ら で す 。 た と えば , 

GOTO55 と СОТО. 55 

は 同じ 文字 列 と し て 扱い ます 。 
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(5) BASIC イ ンタ プリ タ の サ プ ル ー チ ン を 
利用 し て いま す が , BASIC イ ンタ プリ タ 
の 内 部 を パッ チ (変更 ) し て は いな い の 
T, BASIC プ ログ ラム の 実行 に は 影響 を 
与え ませ ん 。 

2. ブ ログ ラム の 入力 


—7 BASIC ( MZ-1Z001) の 場合 は リス 


1 (使用 例 ) 


жа MONITOR MZ-12001M жж 


ト 1, ま だ た ディ スク BASIC(MZ-2Z001) は リ 
スト 2 を 参照 し て , モ ニタ の M コ マン ド で F 
800 番 地 か ら F9FF 番 地 ま で を 入力 し て 〈 だ 
さい 。 リ ロケ ー タ プル で は あり ませ ん 。 
正しく 入力 で きだ た だら,。 モニ タ の S コマ ン 
ド で スタ ー ト アド レス F800 番 地 , エン ドア 
ドレ ス F9FF 番地 と し て , テー に SAVE し 
て くだ さい 。J-ADR. $ に 対し て , すぐ に [CR| 


BASIC interpreter М2-12981 V1、OC ` 


Copyright 1982 by SHARP Corp. 


43500 Bytes 
Ready 


LORD 
FOUND "チチ ナイ "45"4 г サク セン" 
LOADING "*74 サイ ライ 2 ザクセン" 


*SERRCH STRINGS く < く 16CHR。 う ? 
GRAPH 


*SERRCH START LINE МО.<беҒіӨо? | 
se CONSOLES9。 24, C40, Ni LIMITSCOO@: CONSOL 
123 


EGH: GRRPHC* GRAPHI 2,0 
114 GRRPHI2 


16420 GETAS: IFAS" S" THENGRAPHI1;C; 12, POR 


I3,C: RETURN 

woo < SEARCH END? жж 
CE 
1 NEW SEARCH —-PUSH<F9> | 
| NEXT SERRCH--PUSH く F19> | 
و‎ 


Ready 


` 11тууйт)тия 


; ] BASIC 文 字 列 サー チ ・ ツ ー ル 
ырас... DL 


ゴツ ー ル 起動 


コメ ント ` 


1 — Án 
3 ame i NIE 


ーー ファ ンク ショ > ン ・ キ - 


ーー ファ ンク ショ ン += EM 


ラテ ンタ m 


を 入力 し て ジャ ンプ アド レス を 省略 し て も 
いい の で す が , Oh/MZ チ ェ ッ クサ ム ・ プ 
ログ ラム (本 誌 "83.6 月 号 ) で 入力 ミス が 
な いこ と が 確認 びき たら , ジャ ンプ アド レン 
ス を F800 番地 も し て テー プ に SAVE し て お 
いた ほう が 便利 で す 。 

ディ スク BASIC の 場合 は , SAVE し た テ 
ー プ か ら Filing CMT" の ユー ティ リティ 
を 使用 し て ディ スク に 登録 し て くだ きい 。 


3. プ ログ ラム の 起動 


(10 テー プ BASIC の と き 
① サ ー チ 対象 の BASIC プ ログ ラム を あら 
か じ め LOAD し て ぉ く 
②LIMIT $ F7FF [CR] 
МОМ [CR] 
(《④SAVE し た プロ グラ ム テ ー プ を セット 
⑤*L[CRI 
(⑥* J[CR|) 
(⑦J-ADR.$F800 [CR] ) 
⑥ と (⑦ は SAVE の と き に ジャ ンプ アド 
レス を 指定 し て いれ ば 不要 で す 。 
(2) ディ スク BASIC の と き 
① サ ー チ 対象 の BASIC ゲ ログ ラム を LO 
AD 
@LIMIT $ F7FF[CR) 
@LOAD' I Q >2— O 72 7 A +," [CR] 
@MON [CR] 
s J(CR) 
($J-ADR.$ F800[CR] 
これ で , サー チ す る プロ グラ ム が 起動 
され ます 。 RUN コ マン ド で この プロ グラ 
ム を 起動 し な いで くだ さい 。 


4. プ ログ ラム の 使い 方 


① 最 初 に サー チ 文 字 列 の 入力 モー ド に な 
り ま す 。16 文 字 以内 の 文字 列 を 指定 し て 
《 だ きい 。 省 略す る と 全 行 出力 に な り ま 
すら 
Ас, サー チ を 開始 する 行 番号 を 入力 
し て くだ きい 。 省 略す る と テキ スト の 先 
頭 か ら サ ー チ し ます 。 
⑧③ 指 定 し た 文字 列 と 同じ 文字 列 (空白 は 
無視 ) が ある と, その 行 を 表示 し ます 。 
サー チ を 続行 し た い 場 合 に は [FIO キー を 
押し て くだ きい 。 
④ 新 し い サ ー チ 文字 列 を 指定 し た いと き 
iz, [F9] キー を 押し て く 〈 だ さい 。 

図 1 に 使用 例 を 示し ます 。 


図 2 フロ ー チ ャ ー ト 


( START($F900) ) 


ファ ンク ショ シン キー 
“ІП の セッ ト | 
| revo ヵ | 
|| サー チ 文 字 列 入力 


22 w—- | 
7 ІШ 


文字 列 比較 
NO 


パッ ファ ポイ ンタ を 
| 文字 分 歩 進 


ら 5. コメ ント 


(1) この プロ グラ ム を 実行 する L, 

DEF KEY (9 ) -USR(SF800) [CR] 
DEF KEY (10) - USR ($Е802) [CR] 
を 投入 し た 形 に な り ま す 。KLIST コ マン 
ド で 確認 し て みて くだ さい 。 フ ァ ン クシ 
ョ ン キ ー の 定義 領域 は 1200 番 地 か ら 12A 
0 番地 まで で , ここ を 更新 し て いま す 。 
詳し て は リス ト 3 の アセ ンプ ルリ スト を 

参考 に し て くだ きい 。 

(2) サー チ 文 字 列 を 省略 し て すぐ に [CRI] と 
する と , 1 行 ず つ 全 部 の 行 を [F10| キー で 
表示 る させ る こと が で きま す 。BASIC プ ロ 
グラ ム を 入力 し 終わ っ て , 入力 ミス が な 
いか どう か を チェ ッ ク す る と き , この 使 
い 方 を する と 便利 で す 。 


| BELL 


。(、BAsic<$i3o0) ) 


BASIC へ ($!3IF) 


m 


$59. lo Ey 


6. プ ログ ラム の 説明 


@ 概略 フ ロー チャ ー ト を 図 2 に 示し ます 。 

© CALL BIN (CMT の と き $18A7, デ ィ ス 
ク の と き $1A23) iX, 10 進 ASCTI 文 字 を 
2 バイ ト の 2 進数 に 変換 す る BASIC イ ン 
タプ リタ の サブ ルー チン で す 。 

eCALL LSR (CMT の と き $1988, ディ 
スク の と き $1B04) は , HL レジ スタ に 格 
納 さ えれ て いる 行 番号 を サー チ す る サブ ル 
ー チ ジン で す 。 

eCALL BCNT (CMT の と き $19CA, > 
ィ ス ク の と き $1B46) は , 行 の 長き る (53 
イト 数 ) を カウ ント し て BC レジ スタ に セ 
ッ ト す る サ プ ル ー チ ン 。 


-@ 他 の サ プ ル ー チ ン は BASIC/MONITOR 


マニ ュ ア ル を 参考 に し て くだ さい 。 
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リス ト 1 (テー プ BASIC〔MZ-1Z001) 用 ) 


ЖЖ Oh!'MZ Check sum System V1.1 жж 

ADR. +0 ті +2 +3 isum. 
із СЕ 
z2.Dó 
і2.Ғ4 
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898 
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% В А ч 

с-та ИР S DONC 
Ж, 


も に は 
ЧЫН 


ор 2A 
52 45 48 
54 20 4C 
АҒ 2Е 28. 
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50 


ыы 
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SSE 
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0000B578 


リス ト 2 (ディ スク BASIC〔MZ-2Z001〕 用 ) 


ж 

ADR. 
F800 
F808 
F810 
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F978 9B 9B 9B 9B 9B 9B 9B 9B :4.DB 


( ------------------------ ------ 1834 


np 
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| 
НІНІ 


_ f$* BASIC-TEXT-SEARCH-TOOL + 
S <м2-12001 V1.0C) M 
24% 1994.1.15 BY V.O —— * 
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FE 
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高 さ 120m の ビル を 登れ ! 行 手 を は ば お モン スタ ー 達 は 
ジャ ンプ キッ フク で や つつ けろ !I MZ フ ァ ン 注目 の 的 の リ 
アル タイ ム ゲ ー ム は 今 、 絶 好調 で バン 進 中 で す 。 


難 麻 ノ / の ア だ が ベン チャ ー ゲ ー ム 


ある 日 届い だ 手紙 が ガー 通 、 魔 女 が びす お 古い 屋敷 に ダイ 
ヤ モ ン ド が 隠さ れ て いる と 言う 。 気がつけ ば あな だ は 、 
その 屋敷 の 前 に 立つ て いた ! 超 難 解 ア ド ベ ンチ ヤー。 


偽 論 ノ / の マー ジャ ング ゲー ム 


For MZ 700, 1200 
y3500 
コン ピュー ター と 一 騎 う ちの 2 人 打 マ ー ジ ャ ン ゲ ー 
自動 役 判定 は 6 倍 役 満 ま で を 判定 、BGM も 流れ る キヤ 
ラフ タプ ラフ ィ ッ フ に よる 本 格 志向 の マー ジャ ヤン で す 。 


タス ク フ オォ ー ツ 高 〒780 &Irb$88 3434-14 
120888(40)1207 
X1 用 商品 と カツ ログ の 製作 が 遅れ て お り ます 。 申し 訳 あ り ま せん が ガ 今 し ば ら こ お 待ち 下さ い 。 
通販 お 申込 の 万 は 商品 名 ・ 機 種 名 を 明記 の 上 代金 + 送料 300 円 を 当社 まで お 送り 下さ い 。 
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昨年 の こと で す が , X1 用 の CP/M が , シ 
ャ ー ジ より 16,800 円 で 発売 きれ まし た ね 。 
一 般 に CP/M と いえ ば 30,000 円 以上 , だ い 
たい の 場合 60,000 円 台 で ある こと を 考え る 
と , これ は 実に 快挙 だ だ たい を ます 。 し か も , 
WORDMASTER ま で 付属 し て いま す 。BI 
OS DIER, FORMAT な どの マシ ン 固 有 の 
ツー ル , ディ スク へ の 書き 込み , 流通 な どの 
手間 を 考え る と , 16,800 円 と いう 値段 は , 
ギリ ギリ の と ころ で は な いで し ょ うか 。 シ 
ャ ー プ の 英断 に は 。 拍手 を な し まな いと こ 
みろ で す 。 

と いう わけ で 誰 に で も 手 が 出 る X1 用 C 
P/M を 中 心 に , 今月 か ら 12 回 の 了 予定 で 連載 
を 始め ます 。 た だ し , MZ-80B, 2000/2200 
の CP/M ユー ザー に も 役に立つ プロ グラ ム 
に し ます の で , 安心 し て 《 だ さい 。 で は 始 
DH UIs 


ӨФӨ CP/M の お さらい 


最初 か が ら お きら いと いう の は , お か し い 
か も し れ ま せん が , Oh/MZ の バッ ク ナ ン 
バー (83 年 11, 12, 84 年 2 H=) (2, CP/ 
M の 解説 は あり ます し , まだ た よく で きた C 
P/M の 入門 書 , 解説 書 も 数 多く あり ます の 
C, 私 は CP/M の 解説 を 1 か ら 始 め る つも 
り は あり ませ ん 。 必 要 な つど , 少 し ずつ 説明 
は し ます 。 こ の 連載 の 目的 は , 入門 で は な 
5, いか に し て CP/M を 使う か だ か ら で す 。 
と いう わけ で , CP/M を 知ら な い 人 は , š 
、 ず 最 低 限度 の 勉強 を すま せ て お きま し ょ う 。 
その 場合 の ぉ 勧め 品 は 
DAP, 実習, 応用 CP/M (3 部 作 ) 村瀬 

康治 著 , (株 ) ア スキー, 1982 
2) 標 準 CP/M ハ ンド ブッ ク , Roday Zaks # 

村瀬 康治 訳 , (株 ) ア スキ ー, 1982 
で す が , どちら も 高価 な 本 で すか ら , 覚悟 


第 1 алва, 


Youichi Takano 


高野 唐 一 


を 決め て 《 だ さい 。 せ っ か 〈 手 に 入れ た だ C 
P/M を 生か せる か どう か の 瀬戸 際 で す 。C 
P/M を 使う 場合 は , CPIM に 付属 し た マニ 
ュ ア ル だ け で は , 決定 的 に 不足 し ます 。 š 
R, つい で に CP/M の 勉強 法 に つい て , 私 
自身 りか っ て な 意見 を 述べ て お きま す 。 

それ は , 第 1 に 「 使 う 」 と いう こと で す 。 
ア ャ ンプ ラ で ゲー ム を 書き た い , と か , Е 
ORTRAN を 使っ て , 数 値 解析 を し た い , な 
と どの 具体 的 な 目標 を も つこ と だ と 思い ます 。 
た だ 単に 「CP/M を マス ター し た い 」 と 思 
うだ け で は ,「 そ れ を マス ター し て も , どう 
っ て こと な いや 」 と 同じ こと に な っ て し ま 
vT ЦЕ 165—8 

る て , 本 題 に 入り ます 。 

CP/M は 8080, 8085, Z80 用 の ディ スク オ 
ペレ ー テ ィング シス テム で す 。 平たく いえ 
ば , ディ スク 用 の 便利 な サ プ ル ー チ ン 集 で 
+ (少し 誤解 を まね く か な ? )。 CP/M は , 
あく まで サブ ルーチン 集 で す の で , それ だ 
けけ では, な ん に も で きま せん 。 EST; C 
P/M を 買う と , ASM (アス ム ), ED (= 
К), DDT (ディ ディ ティ ) な どの 「CP/ 
M と いう サブ ルー チン 集 の 上 で 動く プロ グ 
ラム 」 が 何 本 か 付い て きま す 。 

ASM は , アモ ンプ ラ , ED は ライ ン エ デ 
ィ イタ 。DDT は 。 7239203, た だ し 。 А 


SM と DDT は 8080 用 で す の で , Z80 の ニー _ 


モニ ッ ク に 慣れ だ 人 は ,。 ノイ ロー ゼ に か が か 
っ て し まい ます 。 

また , ライ ン エ ディ タ の ED は , だ し か に 
ライ ン エ ディ タ と し て は 強力 な の で す が, 
WORDMASTER の よう な , スク リー ン エ 
ディ タ と 比べ れ ば , 使い ご こち は 雲泥の差 
ТЕСТІ グモ ンジ トラ HUD L: 72 C 
P/M の 使い 方 は , 次 の よう に な り ま す 。 
⑩⑯ ス フリ ー ン エディ タ を 手 に 入れ る 


CP/M@⑧ は 米 デ ジタル リサ ー チ 社 の 登録 商標 で す 。 


AS — Rr | 
ЖЕСЕ ERN s DH 
ШӨ узса. 


は 知ら な い 人 」 の ほう が 多い らし い の で 
Fo ELT, 実数 は よく 知り ませ ん が 、 

8080. 8085 (8080 よ り 、 ほん の ちよ っ つと 
の 全数 の る い CPU) を 使っ だ コン ピュ | 


| 蘭 コ ン パ チ ブ ル で 、 ア セン プラ の 体系 が 


まつ だ く 違 う CPU が 開発 され だ と し た _ 
ら 、 ど うな る で し よう か マ みん な こ ぞ 
つて z 80 と 、 そ の アセ ンプ ラ を 使う の を 
や め て 新しい CPU の ほう へ 物 つ て い ぐ | 


| で し ょ うか Y きっ と そう は な ら な いで | — 
し よう 。 少な く ぐ と も アセ ンプ ラ の 体系 が | 0 


同じ な ら 別 で す が 。 と いう わけ で CP/M | 
の 開発 元 の デジ タル ・ リサ ー チ 社 も Z80 | 


X1 の CP/M に は , WORDMASTER が 付 
いて 《 る の て 問題 は あり ませ ん が , MZ O 
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` ユー ザー は , 買わ な けれ ば な り ま せん 。 WO 
x  。RDMASTER の 場合 は , 38,000 円 で す 。 % 
|» 金 の な い 人 は ,ED に 慣れ る し か あり ませ ん 
(ED は 慣れ れ ば 使い ご こち は 悪く な いよ う 
で す )。 
の ② ア セン プラ を 手 に 入れ る 
大 部 分 の 人 が 280 の ニー モニ ッ ク に 慣れ 
て いる し 思い ます の で , や は り ASM で は も 
の 足り な いと 思い ます 。Z80 の ニー モニ ッ 
ク が 使え る 4 と し た ら , や は り MACRO-80 が 
最良 な の で す が , 60,000 円 と 高価 で す 。 
デバ ッ ガ を 手 に 入れ る 
アセ ンプ ラ と 同じ よう に DDT で は , 280 
特有 の 命令 は 使用 で きま せん 。Z80 用 の デ 
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表 1 WORDMASTER の まとめ 


イン サー ト を オン / オ フ に し ます 。 
ー ソ ル を 1 放 字 左 へ 動か し ます 。 
カー ソル を 1 文字 右 へ 動か し ます 。 
カー ソル を 1 ワー ド 左 へ 動か し ます 。 
カー ソル を 1 ワー ド 右 へ 動か し ます 。 


AO 
A Sti- 
A D ま た は 一 
ЛА 
АЕ 
ло 
AX また は } 
AE また は 1 
Ау 


カー ン ソル を 1 行 下 へ 動か し ます 。 
ー ン ソル を 1 行 上 へ 動か し ます 。 


下 に 動か す に は 2 回 タイ プ し ます 。 


AB 


Aw 
^2 
AR 


ファ イル を 1 画面 分 戻し ます 。 
ファ イル を 1 画面 分 次 へ 動か し ます 。 


ー ド で V と 復帰 を ケイ プ す る と , ビデ オォ モー 


id Ds … 数 値 。 省 略し た 場合 は 1 #1465535, 
… ポ イン タ を n 文 字 動か し ます 。 ЖОО 
…n 文 字 削 除 し ます 。 
ee43 ageo ese seeeee4a … ポ イン タ を n 行 動か し ます 。 NOG (Get) е“ “ 
RE E sepes Is aL Jai ERN …n 行 削除 し ます 。 
көзө …n 行 表示 し ます 。 [ey CRITERIO 
——— вв зөв зә n ペ ー ジ (1 ペー ジ 23 行 ) ポ イン タ を 動か し , 表示 し QK (Kill) 


ます 。 
* -n[CR] (— — ポイ ンタ を n 行 動か し , 
… テキ スト を n 回 挿入 し ま 


nA テキ スト $(Append)・ 
+—nF #— $ (Find) … 
+—nN#— $ (Next) 


%7. 


Е ファ イル を 読み 込み ます 。 


カー ソル を 区 の タブ スト ッ プ へ 動か し ます 。 


ー ソ ル を 画面 の 一 番 上 へ , 次 に 一 番 下 に 動か し ます 。 


カー ソル を 行 の 左端 へ , 次 に 右端 に 動か し ます 。 
右端 に 動か みす に は 2 回 タイ プ し ます 。 
画面 上 で ファ イル を 1 行 下 へ 動か し ます 。 
画面 上 で ファ イル を 1 行 上 へ 動か し ます 。 


填 ま た は 一 。 省略 し た 場合 は 十 。 
““өзсаре, AZ, また は 復帰 。 


…1L を 実行 する つど , テキ スト を 挿入 し ます 。 
… キ ー で , 短い 検索 を し ます 。 

… キ ー で , 長い 検索 を し ます 。 

+ 一 nS キ ー$ 新 し い テ キス ト $…… キ ー で 短い 検索 を し , 新しい テキ スト て 置き 換え 


バッ ガ と し て は , 259109, 


38,0008] L X +, EO 
tS 
の 3 種 の ソフ ト を 揃え る と 非常 に 便利 な の 


以上 の エディ イタ , アセ ンプ ブラ, 


で す が , 3 種 の ソフ ト と も 機能 は 低い が , 
一 応 CP/M に 付属 し て いる と いう こと が 業 
腹 で すね 。 ひ ょ っ と し た ら , 私 の こと を ソ 
フト 屋 の 回 し も の だ と 思っ た 方 も いる で し 
ょ う が , 無理 あな いで し ょ う 。 を そこ で , 2 
回 は 間に合い ませ ん で し た が , 次 回 に は , 
この 3 種 の ソフ ト の うち 安価 を うな も の を 
探し て 「 お 買い 得 」 リ スト を 書き た いと 思 
いま す 。 もっとも, それ ぞ れ は 10,000 円 を 
下る こと は あり ませ ん が , それ で も 購入 の 


復帰 。 


Ла 
“Р 
езоаре 


ド に 戻り ます 。 


О 

1 行 表示 し ます 。 0L テ キス ト $ (Loab)… 

す 。 n/QL テ キス ト $ …… 
nZ(Sleep)……… 
M enne nn ОСОО 


nH キー$ 新 し い テ キス ト $…… キ ー で 長い 検索 を し , 新しい テキ スト で 置き 換え … フ ァイル を セー ブレ し , 編集 を 終了 し ます 。 
(Replace) £T. Нең” …" フ ァイル を セー プレ し , 編集 を 継続 し ます 。 

/ғ, IN, /S, /Веееееееееее еккен それ ぞ れ , F.N.S.R と 同様 で す 。 た だ し , 検索 が Q (Quit) …" そ れ ま で の 編集 を 無効 に し , 編集 を 終了 し ます 。 
失敗 し た と き は , 現在 の ルー プ あ る い は QX を 出 て , О “еее еее келте кекке кек кектене ке. それ まで の 編集 を 無効 に し , 編集 を 継続 し ます 。 
実行 を 続け ます 。 * テ キス ト " の 中 の 特殊 文字 : AN Ug ^Y escape. 

TG Улт днка cela Шынаа кайнай деч ルー プ n 回 … を 繰り 返し ます 。 n を 省略 し た と き は , "M" の 中 の 特殊 文字 : AS セパ レー タ , ^A 任意 の 文字 , Ox x 以 外 の 文字 , 
n を 64K と みな し ます 。 АМ 復帰 改行 , AY escape. 


RIL EKETE iT 


カー ソル の 位置 に ある 文字 を 削除 し ます 。 
カー ソル の 左 の 女 字 を 削除 し ます 。 

1 ワー ド の 左側 を 削除 し ます 。 

1 ワー ド の 右側 を 削除 し ます 。 

ー ン ソル か ら 行 の 左側 を 削除 し ます 。 
カー ソル か ら 行 の 右側 を 削除 し ます 。 
復帰 を 含め た 行 全体 を 削除 し ます 。 
タプ ブ 。 フ ァイル 女 字 と し て 扱わ れ ま す 。 
復帰 を 挿入 し , カー ソル を その 前 に セ 


イン サー ト オ ン の と き : 復帰 改行 を ファ イル に 挿入 し ます 。 
イン サー ト オ フ の と き : カー ソル を 次 の 行 の 先頭 へ 動か し ます 。 
ファ イル の 終わ り で : 2 > í JV (Sin U £ T+ 

次 の コマ ンド 文字 を 4 回 実行 し ます 。 

Xo XE (制御 文字 で も ) を ファ イル に 入れ ます 。 

ビデ オモ ー ド か ら コ マン ドモ ー ド に 移り ます 。 


өөн n 行 ファ イル に 書き 込み ます 。 
OO ファ イル か ら n 行 削除 し , それ ら を スク ラッ チバ パッ 


tenen ファ イル か ら n 行 削除 し , それ ら を スク ラッ チバ パッ 
өөн スク ラッ チバ パッ ド の 内 容 を n 回 ファ イル に コピ ー し 


MO スク ラッ チバ ッ ド の 内 容 を 表示 し ます 。 


өөөнө ビデ オモ ー ド に な り ま す (ESC を 押す と 元 に 戻り 


aede 文字 コー ド n を ファ イル に 入れ ます 。 


部 を 覚え る 必要 は あり ませ, 
使用 法 を 覚え て , その 他 は 必要 な 
て いけ ば よい の で す 。 ス クリ ー ン エディ タ 
の 場合 最低 限度 必要 な の は 次 で らい で し _ 
15, WORDMASTER を 例 に あげ て あき Set: 
%%; DR m 
a. 起動 の し か た 。 Сары: 
WM. TEST. ASM : 
TEST. ASM と いう ファ イル が , 存 


ッ ト し ます 。 


ド に 入れ ます 。 

ド に 追加 し ます 。 

ます 。 
… ス クラ ッ チ パッ ド を クリ アー し ます 。 
…… ス クラ ッ チ バッ ド の 内 容 を 実行 し ます 。 
…' テ キス ト を スク ラッ チバ パッ ド に 入れ ます 。 
… テ キス ト を スク ラッ チ パ ッ ド に 追加 し ます 。 
…n 秒 待ち ます 。 

ます )。 


… こ れ に 続く 文字 を 注釈 と みな し ます 。 


すれ ば よい ぃ でしょ う 。 に , すでに 存在 する ファ イル を 変更 する 場 ー5T で 5 ~9 行 が 表示 され る 。 | 
с 挿入 と 削除 の 方 法 。 合 は #A で , 読み 込み ます 。 た だ し を その 際 , 5T で 10 一 14 行 が 表示 る れる 。 
WORDMASTER で は , 人 0 で 挿入 メモ リ 内 に 読み 込み きれ な い ほ ど 大 き な フ CP は 移動 し な い 点 に 注意 / 


在 し な い 場 合 は , WORDMASTER 
が , 自動 的 に 作っ て 〈 れ ます 。 存 在 
する の な ら ば , その ファ イル を 読み 
込ん で くれ ます 。 

カー ソル を 上 下 左 右 に 動か す 。 


[ESC で コマ ンド モー ド に 入り ます 。 
その 後 Q [CR] T, Abort (Y/N) ? と 
聞い て きま す の で Y [CR| と し て くだ 
© 

e. エエ デイ ッ ト し た ファ イル を , ディ イス 


B コ マン ドー バッ ファ の 先頭 へ キ ャ 


ラク タ ポ イン タ (以後 CP) を 移動 し 
ます 。 

I コマンドーCP の 位置 か ら 挿入 を 始 
め ま す 。 入選 で 挿入 モー ド を 抜け出 = 


X1JHD WORDMASTER iz, [Т] ク に 書き 込ん で か ら , シス テム に 戻 гіт E 
円 | の キー を 使っ て , カー ツル を 5. n: - CP を , 第 n 行 の 先頭 へ も っ て い | 
動か の すこ と が で きる の で , この 点 は [ESC] で コマ ンド モー ド に 入り , そ の きま す 。 3 
簡単 で し ょ う 。 AE, AX, AS, 後 E [CRI で す 。 ^ エ ュ マン ドーnT の 形式 で 使う 。 | 


AD も 同様 な 機能 が あり ます か ら , 
慣れ た ら , 好き な ほう を 使う よう に 


モー ド に な り ま す 。 もう 1 度 ЛОС 
を の モー ド か ら 抜 け 出 し ます 。 
削除 は , [DEL| だ け で よい で し ょ う 。 
1 行 挿入 の 場合 は 挿入 し た い 行 の 
左端 へ カー ソル を 持っ て いっ て , 人 
N で す 。 1 行 削除 は , 削除 し た い 行 
へ カー ソル を 持っ て いっ て , AYT 
す 。 

エディ ッ ト し た ファ イル を 没 に し て , 


_CP/M に 戻る 。 


32827z2^7z^z»^ 
Е 


ST, ED の 場合 は 少々 面倒 で す 。 
ED. TEXT. ASM で ED を 起動 す る 。 次 


ァイル で あれ ば , 途中 まで だ け で す (この 
場合 は , W コ マン ド で , 最初 の 何 行か を 一 
時 的 な ファ イル へ 書き 込ん で バッ ファ に 余 
裕 を も た せ て か ら , 読み きれ な か っ た 分 を 
読み 込み 4… と いう 手順 で エディ ッ ト が 行なわ 
れる 。 つ まり , ユー ザー が メモ リマ ネー ジ 
メン ト を し な けれ ば いけ な い 。 ED の 最大 の 
欠点 )。 ファ イル が 十分 小さ きい ぃ として, ЕЖ 
進め まし ょ う 。 最 低 限度 覚え る 必要 の ある 
の は 次 の 7 つの コマ ンド で らい で す 。 


| ニー モニ ッ ク 対 応 表 (Шшф, ASCII SYSTEMSOFT PC-Techknow 8800 Vol. 


ç 


CP の 位置 か ら , 土 n 行 分 を 表示 する 。 
た と えば , CP が 第 10 行 に ある な ら ば ぱ , 


K コ マン ドーCP か ら キ n 行 を 削除 す 

5, tnik, T コ マン ド ょ 同様 。 

Q コ マン ドー ファ イル を 没 に し て , 

シス テム に 戻る 。Q 一 (/N) ? ЕШ 

いて くる の で Y 上 答え を る 。 — 
"ー フ ァイル を 書き 込ん で , 


ч Ф س‎ m Q n — о 


„бее. ~ 


т 
で エロ ロマ で エロ ロウ 


E 
ж 
? 
5 


ИТИГІТТІТ 


zgzoo 32232333^c 


と き に は 素 っ 標 の CP/M シス テム と 対決 し 
な けれ ば な ら な いと き が ある の で , この 最 
低 限 の 7 コマ ンド で か わし て いま す 。ED は, 
azy FERATA L, か な り 強 力 ら し い 
の で す が , 慣れ る に は か な り の 経験 が 必要 
UT. 

アセ ンプ ラ の 使い 方 を 覚え る 

ASM の 場合 は , 

АЅМ, TEXT [CR] (エク ステ ンション 一 

`,” の あと の “ASM の 3 文字 一 は 不要 ) 
で , エラ ー の な い 場 合 は , 

TEXT. PRN と TEXT.HEX と いう 2 つ 
の プロ グラ ム が で きま す 。 一 .PRN の ほう は 
アセ ンプ ルリ スト , 一.HEX の ほう は , 機械 
語 に 半分 な りか か っ た デー タ が 入っ て ます 。 
次 に , 

LOAD TEXT [CR] 

T, TEXT.COM と いう ファ イル が で き , そ 
れ が 最終 的 に で きる 実行 可能 形式 の ファ イ 
ル で す 。 ア セン プラ の 最初 に ORG_」100H 

(H を お むと る な いよ うに /), 最後 に END を 
忘れ な いよ うに 。 

MACRO-80 の 場合 は , 少々 面倒 に な り ま 
す 。 ま ず , 一 .PRN の ファ イル 出力 の た め に 
プロ グラ ム の 先頭 に .PHASE_,100H と 書 
いて お いて 〈《 だ さい 。ORG 命令 は な し で す 。 
この ソー ステ キス ト を アセ ンプ ブル する に は , 

M80, ТЕХТ, TEXT- TEXT t L š+, 
これ で , TEXT. РЕМ, TEXT. REL の 2 
つの ファ イル が で きま す 。 ~.REL と は , Y 
ロケ ー タ ブル ファ イル で , LINK-80 を 使っ 
て , 好き な 番地 に 配置 で きる よう に な っ て 
әт. Же, 

1,80, ,/P :100, TEXT, TEXT/E/N 
t, ТЕХТ. COM が で きま す 。 

実は MACRO-80 は , 普通 は この よう な 使 
われ 方 は し ませ ん 。 それ を 無理 に , ASM と 
同じ よる に 使っ て いる の で , 多少 面倒 な 手 
続き に な り ま す が , 決ま りき っ た 形式 な の 


サン プル プロ グラ ム 


で すでに 覚え る で し ょ う 。 MACRO-80 は , 
非常 に 強力 な アセ ンプ ラ で , 多分 これ 以上 
の も の は 必要 な い は ず で す 。 
デバ ッ ツガ の 使い 方 を 覚え る 

この デバ ッ ガ が に 類 し た も の は , WRIN 
て いる の で , 使用 法 を 覚え を る の は 簡単 で し 
ょ う 。DDT の 場合 は , DDT, ТЕХТ. CO 
M で , DDT が 起動 し , 同時 に TEXT. COM 
も メモ リ 内 に 読み 込ま れ ま す 。 具 体 的 な 例 
は あげ ませ ん 。 

ZSID は , ZZ80 の ニー モニ ッ ク が 使え る 
以外 は DDT と ほぼ 同じ な の で す が , ア セン 
ブル する 際 に シン ボル テー ブル を 作っ て お 
《 こ と に より , ラベ ル 名 を 参照 し な が ら 。, 
デバ ッ グ を する こと が で きま す 。 こ の 点 D 
DT で は 絶対 番地 し か 参照 で き なか っ た の と 
大 き な 差 が あり ます 。 しかし, 私 の 考え で 
は , 特に た ちの 悪い バグ 以外 で は , この 機 
能 は パワ フル すぎ る 気 も し ます が 。 

以上 が , アセ ンプ ブラ を 中 心 に し た CP/M 
の 使い 方 の 基本 で す 。 い ちば ん 大 事 な の は , 
簡単 な 方 法 で も よい か ら , と に か く 使 える 
よう に な る こと で す 。 最初 か ら , すべ て の 
テク ニッ ク を 使 な うと し て も 不可 能 で す 。 

今月 は 。 な ん だ か ん だ 言い な が ら , たい 

し た こと は で きま せん で し た だ Sb 
くま で , ASM で 耐え 忍 べ さ 人 の た め に , 8080 
ーZ80 の 対応 表 ( 表 2 ) と , 8080 ニ ー モ ニッ 
ク で 書い た サン プル プロ グラ ム を 載せ て お 
きま す 。 一度 対応 を 覚え れ ば , 8080 で も け 
っ こう や れる も の で す の で , 気 を 確か に も 
っ て くだ きい 。 サ ンプ ルプ ログ ラム の は う 
は , ソース だ け で す の で , 頑張 っ て 打ち 込ん 
で くだ さる い 。 き っ と エディ タ の 練習 に な る 
で し ょ う 。 ま た , 打ち 込み ミス で バグ も 入 
る で し ょ うか ら , デバ ッ ガ の 練習 に な る で 
し ょ う 。 ああ, な ん た る 親心 

それ で は 人 C (る よう な ら ) 


Disk Dump Program for all machine 


Copyright (C) 1984 March Youichi Takano 


5: ORG 
ét WBOOT EQU 
7: BDOS EQU 
8: CONS EQU 
9: TYPEF EQU 
10: PRINTS EQU 
11: READB EQU 
121! DSKBUF EQU 


116 onwz 1984.5. 


199H 

9999H jreturn to сср 
9995H jbdos entry addr. 
1 jread char 


2 jPrint 1 char 
М itype buffer 
10 jread buffer 


әвен jdisk buffer addr. 


921 
931 
941 


751г 


961 


! 
ASKSCT! 


! 
DUMPGO! 


[3 . 
DUMPBF 1 


; 
DLOOPY! 


DLOOPX! 


DUMP 11 


EQU 
EQU 


SP initialize " 


LXI 


exit only when ask TRK,SCT 


end of main loop 


Qet truck number 


LXI 
CALL 
JC 
RET 


х1 
CALL 
JC 
RET 


LDA 
моу 
LXI 
CALL 


LDA 
моу 
LXI 
CALL 


DMA is already» set (0080H) 


LXI 
LXI 
CALL 


LXI 
CALL 
ORA 


9DH 
фан iline feed 


ЗР, MYSP fuser SP 


ASKTRK 
A し 
TRKN сору truck number 


ASKSCT 
A, L 
SCTN jcopy sector number 


DUMPGO 
MLOOP 


D, MESTRK Jask truck No. 

INPN Joet string 

ASKTRK 114 strange then again 
ІН. = number 


D,MESSCT jask sector No. 
INPN joet string 
ASKSCT 114 strange then again 


ІН. = number 
TRKN еі truck No. 
C A 
Hi 10 


CALLER jset truck 


SCTN j9get sector No, 
с,а 

Н, 11 

CALLER jset sector 


B, DSKBUF 
н,12 
CALLER jset DMA addr. 


H, 13 
CALLER fread sector 


а 

ERROR 

DUMPBF jdump 128 bytes 
CRLF jnext line 


н, DSKBUF jbuffer addr. 
C, 08H фу counter 


H |вауе HL for ascii dump 
B,810H jx counter 

ñ M f às (HL) 

H J HL *»HL +1 

PRINTA jprint 1 byte 

A, , 

PCHAR 11 space 

в jB»B-1 

DLOOPX 


B, 18H j counter 

H Joet HL for ascii dump 
ё, M 

H 


(СЫ iPrintable? 
DUMP 1 Jbigger than space then print 
A’. false print ^.’ 

PCHAR iprint ascii 

B 

ADUMP 

CRLF 


с 
DLOOPY 


О ОР/М® 117 


971 RET 
78: | 
991! | 

100: CALLER: DCX 


1011 PUSH D К 

102: моу D,H $55 

1831 MOV E,L 

104! DAD н: 

105: DAD D I : x 

1861! XCHG dicm pies 

107! LHLD MBOOT+1 А 

1086! DAD D jnoe HL has addr, to jump 

1091 POP D . 

118! | 

1111! PCHL IJP (HL) 

112: | 5 

113! | Print out (ОЕ) and set number in HL ў 

114: ІМРМІ MVI C, PRINTB jprint string function No. 

115! CALL BDOS 

116! хка A wl 

1171 STA BUFF*2 iclear top of string е 
LXI D,8UFF JDE has addr of string buffer 


MYI C,READB jinput string func. Мо. 
1211! CALL BDOS 
122: MVI A, LF 

CALL PCHAR 


LXI H, BUFF + 1 j load addr. of count and string 
1261 CALL ATOI jconv it to number 
1271 RET 
128! | : : 
129! | if number is strange then return with CARRY FLAG 
130! ATOI! MOV f, M j9et count 
1311 ORA A Jj check. count 
1321 JZ BATOI Ibad number, return 
133: MOV B,^ jb*count 
1341! INX н jh! Points string 
135: LXI 0,09 jclear DE 
134: ALOOPI MOV һм j9et char 


IHL Points next char 
Itoo small 


Itoo big 
isave HL 


icopy DE to HL 
1451 DAD H іжг 
1461 DAD H 1x4 
1471 DAD D 1ж5 
1x10 


j9get 1 number 


1511 DAD D 

1521: XCHG DE =DEx1 0+BC 

1531 POP H fback string address 
1541 DCR в Idec count 


JNZ INZ then loop again 


XCHG jmeturn val is HL 
1581 ORA ^ jany way саггу=@ 
ВЕТ 


5 set carry and return 
162! BATOI: STC 
КЕТ 


print out А 


PUSH PSM isave АҒ 


jok Print 
180: ADI 7 icase A-F 


181! 
1821 
1831 
1841 
1851: 
1861 
1871 
1881 
189! 
1901 
1911 
1921 
1931 
1941 
1951 
1961 
1971! 
1981 
1991 
200! 
201! 
2021 
293: 
204! 
295: 
2061! 
2071 
2081 
299: 
210! 
2111! 
£121 
2131 
2141 
215! 
216! 
2171 
218! 
2191 
2201 
2211 


ЕЕ Ж ЖЕРДЕН T: 


jsave them 


іргіпі buffer function 


ігеветуе 32 level stack 


PRNé2! CALL PCHAR 
RET 
[] 
PCHARI PUSH B ! PUSH D ! PUSH H 
MUI C, TYPEF 
MOU Е,а 
CALL 8008 
РОР Н ! POP О ! POP B і9е% them 
КЕТ 
LJ 
! next line 
CRLF 1 MVI A, CR 
CALL PCHAR 
MVI ALF 
CALL PCHAR 
RET 
' 
| 
ERROR! MVI C,PRINTB 
LXI D, ERRMES 
CALL BDOS 
RET 
I 
' 
! fixed message area 
MESTRK! DB “Input truck number %” 
MESSCT! DB “Input sector number $“ 
ERRMES! DB “DISK READ ERROR! ^, CR, LF, “$° 
|) variable area 
TRKN1 08 1 isave truck No. 
SCTN! 08 1 |өауе sector No. 
I 
I input buffer area 
BUFF ! DB 5,0 ‚тах 5 char 
DS 19 jenough 
I 
1 stack area 
08 64 
MYSP ( 
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@ 早 い 準備 で 合格 へ / 今 か ら ス ター ト 。 あ な た も / 
* S288-p1E 073 JD Bt / 合格 資料 を 無料 呈 / 


RENE FLT 受験 講座 情報 係 
160 東京 者 新宿 区 大 京町 4 の 383 


念 情報 処理 技術 者 は 不足 / 

コン ピュ ー タ の 技術 進歩 と 設置 台数 の 急 
増 に より 、 情 報 処理 技術 者 は 不足 / 
国家 試験 受験 準備 講座 を 開講 中 ./ 
実戦 即応 の 教材 & 実 戦 模試 ・ ボ イント 指 
導 で 合格 力 を 養成 。 早 い 準 備 で 合格 へ 。 
⑧ 将 来 性 の ある 情報 処理 技術 者 ./ 

企業 ・ 官 庁 で 有 資 格 者 優遇 。 学 生 に 最適 。 


念 受験 資格 は 不問 。 誰 で も 可 / 

受験 資格 に つい て は 、 学 歴 ・ 年 齢 ・ 性 別 ・ 経 
験 な ど は 問い ませ ん 。 試 験 地 は 全国 9 都 
府 市 で 行わ れ ま す 。 4 科目 の 筆記 試験 。 
ФЕ 種 情 報 処理 技術 者 国家 試験 の 合格 
の ポイ ント は 、 早 い ぃ 準備 と 限ら れ た 時 間 
を ムダ が なく 効率 的 に 活用 する こと で す 。 
人 資料 希望 の 方 は 、 ハ ガキ か 電話 で / 
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清く 正しく 面白 く 


Ippei Iwai 


ーー ム 


は っ きり 言う と , 日 本 の ソフ トウ ェ ア は , 
過去 の , 作れ ば な ん で も 売れ る の だ , だ か 
6 ら 作る の だ の が っ ぽ が っ ぱ 的 状況 か ら 6 脱し 
つつ ある よう で ある 。 これ は と て も 良い こ 
と な の だ が , そこ は それ , スネ に キズ 持つ こ 
の 業界 の 前 科 前 歴 か らし て も , あい か わら 
ず 「 を の 筋 」 の ソフ ト が で か い 顔 で , まだ 
そこら あたり を 転がり まわ っ て いる の で あ 
る 。 一 概 に その 筋 と 呼ん で も , さま ざま な 
筋 が あり , うか つ に 語る こと は で き な い の 
で ある 。 だから, あん まり うか つ に じゃ な 
《 語る こと に する の で ある 。 

ST, 私 が ソフ ト を 見 る と き の 基 準 は , 
今月 の 副題 の よう に , 清 〈 正 し 〈 面 白く で 
ある 。 読 者 の 中 に は 「 面 白く に 関し て は ゲ 
ー ム の こと じゃ ね ー か 。 ビ ジネス 関係 は ど 
うす る ん で い 」 と クロ スカ ウン ター を お く 
っ て くる 諸兄 が いる か も し れ な い 。 し か し , 
私 は ば ジネス ソフ ト に も 別 質 の 面白 き が あ 
る の だ , と 言っ て ダブ プル クロ スカ ウン ター 
で 返り 討ち に する の で ある 。 こ の 場合 読者 
Db, トリ プル クロ ス と いう 恐怖 の 必殺 技 
が 出現 する 可能 性 も ある が , それ は お いて 
お く 。 一般 に , 良い ソフ ト は や は けり 面白い 。 

を そう いう わけ で , 本 題 に 入る の で ある 。 


清 い ソフ ト と は , いか 
BIR な る も の な の か 


清 い と いう の は , 姿勢 の 問題 な の だ 。 つ 
まり , 技術 以前 の 問題 で ある 。 

ST, 過去 の 話 で は ある が , 昔 は 清 い ソ 
フト は 少数 で あっ た 。 実名 を あげ る の は 非 
常に を の 筋 な の で き し 控 える が , た と えば 
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BASIC で 書か れ た ゲー ム で , 走ら せる と 平 
気 で エラ ー を 出す ツ ソフト が 過去 に は あっ た 。 
その 他 に も リス ト を 見 る と , や た らし REM 
文 が 入っ て いて , し か も それ ら が ほとん ど 
プロ グラ ム と 関係 が な い ,。 と いう も の も あ 
っ た 。 を その REM 文 た る や, 某 タ レン ト の 名 
前 を 挙げ て 「 ス キ ! 」 と か 書い て いる の で 
ある 。 こ れ な ど は , まる し 〈 く 上げ底 ツ フ ト 
と 呼ぶ べき も の で あっ た 。 その プロ グラ ム 
は テー アプ で 供給 きれ て いた だ たから, ロー ド 時 
間 に よ っ て プロ グラ ムサイ ズ が わか る の で 
bh. そして, あま り 早 く ロー ド が 終わ る 
t, それ だ け で その 筋 と 判明 し て し まう の 
だ 。 を そこで, 陰湿 REM 文 作戦 が 敢行 きれ 
た の で は な い だ ろ うか ? 

いや いや , 状況 は も っ と 緊 追 縄 緯 り か も 
し れ な い 。 

た と えば , を その プロ グラ ム を 作っ た の が 
アル バイ ト だ と し た ら , どう な る だ ろう か 。 
を そして, ソフ ト ハ ウス の を の 筋 の 経営 者 が 
「 豚 バラ 肉薄 切 り 130 円 」 と 同様 に ,「 ゲ ー ム 
プロ グラ ム 1 バイト 2 円 20 銭 」 で 買い 上 げ 
て い だ た と し だ ら 。 うだ ろう か 7 ひ ょ ラ っ 
と し だ た だら, その よう な 悪夢 の ご と き 構 図 が 
あっ た の か も し れ な い の で ある 。 

を その他 に も いろ いろ な 清く な い ソ フト が 
存在 し て いた 。 た と えば , ある も の は , 7 
モ の タイ トル 画面 は や た ら と 豪華 絢 底 で , 
し か し 肝心 の ゲー ム の ほう は , その 筋 だ っ 
た り し た 。 ゲー ム 名 に も 同様 な こと が あり 
期待 きせ る ネー ミン グ で , 実は 中 身 は ほ と 
ん ど 困 り も の と いう も の も あっ た 。 広告 に 
も 同じ こと が あっ た だ た 。 ビ ジネス ソフ ト の 場 
Alk, 「 最 高級 」 と か 「 万 能 」 と か の 言葉 を 


lbs апа. 

に に に し ドド | A 4 

Ё | Bam, -i 

аннан SERES, (лаш: 

NER TER 

LITE ANNE “Ж-Қ. 
"LTW АН 


連ね て , 売っ て し まえ ば こっ ちの も の と か 
いう ソフ ト で ある 。 私 は これ ら 6 の こと が , 
本 当 に 過去 の も の に な っ て ほし いと 思う 。 
最近 増加 し つつ ある の が ,「 マ シン 語 」 と 
銘打っ た , BASIC コ ン パ イラ で 書か れ た ゲ 
ー ム で ある 。 だ た し か に それ は マシ ン 語 に は 
Желе), な ぜ 正 直 に コン パイ ラ の オォ プ ジ 
ェクト だ と いわ ず に , マシ ン 語 と 表示 する 
の か ? これ は 清く な い 代表 例 だ と 思う の 
だ 。 業 界 各位 に 方 針 改 善 を 願い た い 。 
これ ら の 人 間 不 信 養 成 ソ フト は , タダ で 
も 欲し て な いと 申し あげ た だい 。 ひ と つ を の 
点 を よろ し くく お願い し だ いも の だ 。 


BIE 正しい ソフ ト の 傾向 と 対策 


正しく て な い ッ フト の 代表 例 は , 不 親切 設 
計 で ある 。 まあ, し か た が な いとい っ て 許 
せる が , これ が 一 番 多 くも ある 。 だ た と えば , 
や た ら と 騒 々 し ぃ ゲーム で ある 。 特 に 困る 
の が , 殺 ら れ た と き に 葬送 行進 曲 な ど を シ 
ツ ュ ク 演 奏する や つ で ある 。 パ ッ ク マ ン の 
筋 で ,.「 キ ュー へ 」 ぐ で らい で よい の で ある 。 
この 点 で 悲惨 な の が PC 系 の 機械 で ある 。 
一 部 の 機種 以外 は , ボリ ュー ム が な い の で 
ね ち ね ちと や られ る と , も は や ガー ド 下 の 世 
界 が 広がる の で あっ た 。 それ も ブザー を ON 
/OFF し て 出す , その 筋 の ギャ リ ギ ャ リ 音 だ 
6, 夜中 だ と 効果 音 で は な く ,。 逆 効果 音 
に な っ て し まう の だ 。 異教 PC 派 の 方 々 の 中 
に は , 改造 で し の で 人 も いる と 聞く 〈。 一 部 


に は 音 を 出力 きせ る か どう か 選択 きせ る も 5 


の も あり , これ は たい へ ん 好ま し いこ と で 
bb. kh, シス テム プロ グラ ム の 場合 は , 
エラ ー 時 の ビー グ 音 が し つこ いと いう も の 


も ある 。 あ れ は 短く 《「 ピ ッ 」 と 鳴る だ け で 
よ ょ よい の だ 。 それから , PSG を 使っ て いる 場 
合 は , 音 が 出 っ ぱ な し に な る こし と も ある 。 
デモ で ,「 パ ン パ カバ パー ン 」 と 鳴っ て いる 途 


ШТ, スタ ー ト きせ る と ,「 パ ーーーー」 と 
ゲー ム の 間 中 鳴り つづ ける と いう も の で あ 
Ds 


音 だ け な ら ば , まだ まだ 許容 範囲 に ある 
Dî, これ が ソフ ト の 本 質 .、 た と えば 操作 性 
な ど に か か わっ て 〈 る と , イラ イラ の 原因 
に な っ て 《 る 。 た と えば 「 遅 い 」 プ ログ ラ 
ム で ある 。 

一 日 に 遅い と いっ て も , いろ いろ な 遅 き 
が ある 。 思い つく まま に 挙げ る と , ① キ ー 
の 反応 が 遅い 。 ② 特 定 の ルー チン 一 一 た と 
えば 変数 の イニ シャ ライ ズ が 遅い 。 ③ 周 辺 
器機 へ の アク セス が 遅い 。④ 画 面 処 理 が 遅 
い 。⑤ し と に か 〈 く 全部 遅い , な ど が ある 。 時 々 
特別 に 複雑 な こと を し て いる わけ で も な い 
の に 異常 に 遅い プロ グラ ム が ある 。 こ ん な 
bA, よく 売っ て いや が る , と いう レベ ル 
も ある 。 遅 すぎ た ら 発 表し な いで らい の 気 
持ち を 持っ て ほし いと 思う の で ある 。 L< 
に ビジ ネス ソフ ト な ど で は , 値段 が 万 以上 
な の に , 遅かっ た りす る ソフ ト に 出会う と , 
イラ ダチ は 風雲 を 呼び , ЖЕЛ ОСТИ, 
私 は 思わ ず ,「 ぎ ー ! 」 と 叫び つつ キー ボー 
ド を 殴っ た りす る の で ある 。 た だ だし, これ 
は 編集 室 に ある サン プル を 試用 中 の 話 だ か 
5, 万 一 私 が 自腹 を 切っ て 買っ た も の が そ を 
の 筋 び っ た ら , 決し て 逆 上 な ど は せ ず に , 
ひたすら に 凶 眼 を 光ら せな が ら ソ フト ハウ 
ス え へ の 物理 的 報復 を 検討 し た りす る 可能 性 
も ある の で , ソフ ト ハ ウス の 方 々 は 気 を つ 
け て 作っ て も らい た い 。 

以上 パッ ュ ン 騒音 と , テ レン コソ フト は , 
諸悪 の 2 大 潮流 で ある 。 その 他 小 悪 を 挙げ 
る な ら , パッ クマ ン の よう な 迷路 型 ゲ ー ム 
C, その 通路 で の 右左 折 が 異常 に 難し いも 
の が ある 。 つ まり , ピタ ッ と 位置 を 合わ せ 
て か ら , 左右 に 対応 する キー を 押 き る な いと 
曲 れ な いと いう 状況 で ある 。 少し で も ずれ 
て いる と , も うだ め な の で ある 。 最近 で は 
枝 を は っ た 木 を 迷路 に みた て た や つの 唯一 
の 欠点 が これ で ある 。 実 に 残念 で ある 。 

を それから , ブログ ラム を 単純 に する た め 
с, お か し な 制限 を し て いる も の も ある 。 


入力 出 の ディ スク ドラ イブ を 固定 し た り , 
文字 列 の 入力 で [DEL] キー が 使え な か っ た 
b, 数 値 入 力 を テン キー か ら で き な か っ だ 
り で ある 。 

これ ら の こと は , 小さ な 手抜き で ある か 
6, 正しく て ない, と まで 言い きれ な い 。 し 
PU, セコ さき は 元 か ら 断 つべ き な の だ 。 ど 
うか ひと つ , 愛 と 感動 の ソウ フト を めざし て 
ぃ い だ た だ きだ い 。 


面白 く な けれ ば ソフ ト で 


た と えば , アド ベン チャ ー ゲ ー ム の 場合 
で ある 。 こ の ジャ ン ル で 発 表 き る れ て いる も 
の は , だ いた い に お いて 自由 度 の 低い 一 本 
道 構造 に な っ て いる よう で ある 。 私 は その 
点 に つい て は 異 存 が な い 。 し か し を の 筋 の 
アド ベン チャ ー ゲ ー ム の 場合 は ,、 その カギ 
が 非合理 的 な ほど 次 解 ど っ た りす る 。 あ る 
例 で は , 固有 名 詞 が 要求 きれ る の だ が , + 
っ た 《 く の ノ ー ヒ ント で , 推理 は 不可 能 に 近 
か っ た 。 だ まだ を ま 記 事 用 に ソフ ト ハ ウス よ 
b 解答 が き て いた だ の で わか っ た だ の だ が , 一 
般 の 方 々 は ぼう し だ た ん だ ろう か ? 簡単 な 
アド ベン チャ ー ゲ ー ム ほど くだ ら な いも の 
は な い が , か と いっ て 難し き に も 質 と 限度 
が 必要 な の で ある 。 偶 然 の 発想 で し か 解け 
な いよ うな も の は , 解け て も 全然 楽し く な 
い の で ある 。 

ec, 英語 で コマ ンド を 入力 する タイ プ 
の アド ベン チャ ー ゲ ー ム に せ も 問題 が ある 。 
$—2 858410490995 C55. [die 
受け つけ な いで らい は 序の口 で , 絶対 に 英 
語 じ ゃ や ない! と いう 康 章 を 要求 する 場合 
も ある の だ 。 

次 に 反射 神経 型 ゲ ー ム の は うだ が , その 
筋 の ゲー ム は , 次 の 7 種類 ぶ ぐらい に 代表 さき 
れる の で ある 。 

Ф 自動 車 教習 所 型 ゲ ー ム 。 技 術 ば っ か り 
С, な ん の 面白 み も ない ゲー ム で ある 。 た 

と えば , 赤い エイ リア ン が 出 て きた だ たら, Я 
端 に 行っ て 一 定 の 距離 まで 引き つけ て か ら 
射 た な いと , 必ず や られ る , と か の だ ぐい 
で ある 。 こ ん な の を や る より も , 8-86 
寝 て し まっ だ ほう が よい 。 

Ө ルー レッ ト 型 ゲー ム 。 単に 確率 の 問題 
だ け で , ほとん ど 腕 の 見 せ せ どこ ろ の な い ゲ 


ー ム で ある 。 ア ル ゴ リ ズム を 乱数 で 代用 す 
る と で きる 。 
O が ガン ダム 型 ゲ ー ム 。 ま っ た く 操 作法 を 
理解 で き な い ゲー ム で ある 。 や た だ たら と 多く 
の キー を 押さ る ね ば な ら な か っ た だ りす る 。 ニ 
ュー タイ プ で な けれ ば 楽し め ゆな い 。 
O 人 竹 槍 特攻 型 ゲ ー ム 。 あ る 場面 まで くる 
と 突然 敵 が 無敵 に な り , どう し て も クリ ア 
で き な く な る 。 馬鹿 に る され て いる よう で , 
作者 に 殺意 を 抱い て し まう 。 
O 哀 秋 無限 地獄 型 ゲ ー ム 。 ま っ だ くく 同じ 
パタ ー ン の 速度 が 上 る だ け , も し 〈 く は 敵 の 
数 が 変わ る だ け で , エン エン と 繰り 返 き れ 
る 。 こ れ を や っ て いる と , 人 生 の 意味 に つ 
いて , 考え 始め た りす る 。 
O シュ ー ル レア リズ ム 型 ゲー ム 。 ま っ だ 
(常軌 を 逸し た 状況 設定 の も と で 行なわ れ 
る ゲー ム 。 必ず し も 面白 く な いと は いえ を な 
い が 。 わ ざと らし く て バカ バカ し く な る 。 
Ө 1IQ 検 査 型 ゲー ム 。 時 間 制 限 の ある 思考 
型 ゲ ー ム 。 だ だ し 時 間 は 十分 に は ほど 遠い 。 
これ を や る と , ЖОН ЖОЯДЫ А 
じみ と 理解 で きる 。 

だ いだい 以上 で ある 。 

ビジ ネス ソフ ト に 関し て いえ ば , 平凡 な 
な ん の 哲学 も な い ソ フト が 一 番 う っ と うし 
い の で ある 。 最 低 限度 の 機能 を , HELA 
令 で 実行 し な けれ ば な ら な いも の や , 一 見 
強力 を うだ が , 実は ほっ だ 〈 く 役に立た な い 
DOS な ど は 言語 道断 で ある 。 高 価 な くせ に 
な に を や っ と る の だ と 言っ て し まう の で あ 
る 。 


BAR だ か ら , ど ー だ と いう の だ 


2, 3 年 前 だ けど , た し か グラ フィ ッ ク 
を 使っ た ソフ ト が 出回り 始め た ころ , それ 
で も ゲー ム は スタ ー ト レッ ク が 最高 だ っ た 。 
な ぜ , 文字 だ け の ゲー ム が あん な に 私 達 を 
和 興 礁 きせ た だ の だ ろう か ? それ は きっ と , 
良い ソフ ト と は か わい い キ ャ ラク タ な ど で 
は な く , も っ と 別 の も の で ある と いう こと 
だ と 思う 。 そ し て 最近 は 機械 語 の ソフ ト が 
増え て いる が , 間もなく 速い だ け で は な ん 
に 5 面白 (な いと いう 時 代 が や っ て くる の 
だ と 思う 。 ユ ー ザ ー が は て し な く 〈 舌 を 肥 や 
L, その ユー ザー を 満足 させ る 形 で ソフ ト 
が 発展 する こと を 望む し だ いな の だ 。 
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V TH 編集 用 ユー ティ リティ 


Hiroto Ashikaga 


足利 裕人 


は じ め に 


前 回 は , スー パー イン ボー ズ を 使用 し て の VTR 編集 に も っ と も 
基本 と な る タイ トル や , 字幕 の 作成 を し まし た 。 今回 は , VTR 編 
集 を より 楽し 〈 充 実 し た も の と する , 画面 装飾 用 スー パー イン ポ 
ー ズ ・ ユ ー テ ィ リ ティ を 紹介 し ます 。 

X1 の グラ フィ ッ ク 機 能 を 生か し , 作画 用 ゲロ グラ ム を 用 いて 小 
劇場 風 の 演出 を 行なっ た の が 写真 1 で す 。 こ れ に タイ トル を 表示 
L, 幕 を 開閉 3 きせ た りす る 機能 を つけ れ ば より 詩 華 に な り ま す 。 
了 供 向け テレ ビ 紙 芝居 や , 社内 カラ オケ 大 会 な ど に 使う の も 楽し 
いて し じょう 。 ここ で 紹介 する の は , 画面 に 矢印 , 円 , ハー ト の マ 
ー ク を 表示 する プロ グラ ム “MARK” t, 画面 に 鍵穴 , ハ ー ト の 窓 , 
多角 形 の 窓 を 開け , そこ か ら VTR 画 面 を の ぞ 〈 “HOLE”, 場面 
の 切り 換え 効果 を 高め る “SHUTTER”, そし て 野球 を 本 格 的 に 演 
出す る “SCORE WRITER FOR BASEBALL" で す 。 前 回 の 
プロ グラ ム と 併せ る と , 基本 的 VTR 編集 が ほとん ど カ バー で きる 
よう の に な り $T. 


8—0 MARK 

リス ト 1 の プロ グラ ム を RUN す る と, 画面 に 矢印 ・ 円 ・ ハ ー ト 
の マー ク の 選択 が 表示 る され ます 。 矢印 の マー ク は 主 に CAI 用 に 使 
う も の で , 写真 2 は ラグ ビー の 試合 中 の ボー ル の 動き を 追っ た も 
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の で す 。 試 合 の 作戦 を 立て る こと に も 使え ます し , また 教育 番組 
を 録画 し て , 授業 中 に X1 を 操作 し な が ら 重 要 な 物体 の 動き を 示す 
こと が て きま すね 。 сО©7п>У >С, УЗЕ ено 6 
マー ク を 上 下 左 右 終 方 向 に 移動 きせ る こと が で きま す 。 リ スト 
1 の 40 行 の B $ が 矢印 の DATA を 与え ます 。 

円 の マー ク は 矢印 と 同じ 目的 で 使わ れ ま す 。 写真 3 は テレ ビ 画 
面 に 円 を スー パー イン ポー ズ し た も の で す 。 円 の マー ク の 選択 後 , 
円 の 直径 を cm 単位 で 入力 する t, その 値 に 応じ た 大 きき の 円 が 画 
面 に 現われ ます 。 テ ン キ ー で 必要 な 位置 へ 移動 きせ ます 。 

ハー ト の マー ク は , 結婚 式 や 新婚 旅行 の 録画 ビデ オ な どの 編集 
用 に 使え ます ね 。 ハ ー ト の グラ フィ ッ ク デ ー タ (リス ト 1 の 120 行 , 
130 行 ) を 蝶 に 変え て , 家族 ハイ キン グ の 録画 シー ン の 上 を 飛ば し 
た り , マン ガ の 主人 公 や キュ ー ビ ピッ ド を 移動 きせ な が ら ス ー パ ー 
イン ポー ズ す る と 楽し い 記 録 テ ー プ が で き あ が る こと で し ょ う 。 
@ ワ ン ボ ポイ ント テク ニッ ク 

1 ドッ ト ご と の グラ フィ ッ ク ・ パ ター ン の 移動 を 行なう POSI 
TION, PATTERN 命 令 を 使用 し 、 動き を 速く する た め , 上 下方 向 
に 5 ドッ ト ご と の 移動 を キー 入力 で 行なっ て いま す 。 テ ン キ ー は , 
を 中 心 と し て 8 方 向 に 使わ れ て いま す 。110 行 の B $ が 矢印 , 
120 行 の D$, E$ が ハー ト の 左 半分 の グラ フィ ッ ク デ ー タ で す 。 
MIRROR $ 命令 を 用 いて 右 半分 を 作り 出し 、 左右 対称 な が ハー ト を 
作り 出し て いま す 。 皆 さん も グラ フィ ッ ク テ クニ ッ ク の ひと つと 

し て ぜひ 活用 し て 《 だ さい 。 各 パタ ー ン の 
色 は , カラ ー コ ー ド の 7 色 か ら 選 び ま す 。 
680 行 の CANVAS 文 で 、 マ ル チ 画 面 モ ー ド 
の グラ フィ ッ ク 1 の カラ ー コ ー ド を 決定 し , 
700 行 の SCREEN XC, 29742210 
み ド ッ ト セ ッ ト ・ リ セッ ト を 行ない ます 。 
こう する こと に よっ て 3 個 の パタ ー ン に つ 
OT, どれ に も 共通 な カラ ー 発 生 用 サブ ル 
ー チ ン に な り ま す 。 ス ーー パー イン ボ ポーズ を 
Ф, また は 終了 きせ る に は スペ ー ス ・ キ 
ー を 押し て くだ さい 。 パ ター ン が 消 た € 
デオ 画面 の みる 録画 され ます 。 


| 写真 1 


小 劇 場 風 に スー 
パー イン ポー ズ 


リス ト 1 MARK 


10 “жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


20 “ж ж 
30 “ж Xi VIDEO UTILITY (MARK) Уу, і ж 
49 “ж ж 
50 “w Зер. '83 COPYRIGHT (C? ж 
68 “x by H. ASHIKAGA x 
70 “x ж 
B ”жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
9%” 


100 WIDTH 40! INIT! PALETI! SCREEN 0, 8: CLS4 

110 B$*HEXCHR$("OBOCOEOFOFOFOFOFOFOFOFOFOFOFOFOFOFOFOFOFOFOFOFOFOOOGOOOOOSGOCOEOFOÓ 
ЕВЕСЕЕЕҒВФВ08080С0СОСФЕФЕдЕӘҒОҒО") 

128 D$*HEXCHR$("0000000000000103070F 0F 1F 1F3F3F3F7F7F7FFFFFEFFFFFFF7F7F3F3F1F0701 


130 ES$sHEXCHR9("01071F3F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFCFGF 6E9C9 


140 D1$-2D$!E1$7E$ 

150 F$sMIRROR$ (E1$) 18$ MIRROR$ (01%) 

160 С%=0%+Е%+Е%+0% 

170 COLOR 7,8 

180 LOCATE 7,2ІРБКІМТ"а. SELECT MARK sx" 


199 LOCATE 10,ó6!PRINT"P»"A» sa. 1" 
200 LOCATE 10, 81PRINT"IZ ....2" 
210 LOCATE 10, 10ІРКІМТ"І-Ь ... 3" 


220 COLOR 4:LOCATE é, 14:РКІМТ "жж 72 э ヒョウ シド シマ スカ "I!INPUT I!CLS 
230 IF I<1 OR ІОЗ ТНЕМ 170 
240 ON 1 GOTO 250,310,380 
250 yy 
240 X»1601Y21001X$28$:P 224 
270 GOSUB "イロ " 
280 X»1601Y^1001:X$92B$:P*»24 
290 POSITION X,Y1PATTERN P, X$ 
300 GOSUB "INP" 
310 LABEL "r>" 
320 GOSUB "40" 
330 LOCATE 4,101! INPUT"ID ^ チョ ッ ケ イ (cm) "IRRICLS 
340 R*RRXé 
350 X21601Y52100:CIRCLE (X, Y), R 
360 GOSUB "INP" 
' 


388 LABEL "п-к" 
390 GOSUB "4o" 

488 X»1501Y21001X$2C$1P 232 

410 POSITION X, YtPATTERN Р, ХФ 

428 GOSUB "INP" 

430 END 

440 1 

450 LABEL "INP" 

460 АФ= ІМКЕҮФ 

470 IF АФа" " THEN 630 

480 IF A$="" OR &$("1" OR &$5"9" THEN 460 
490 IF A$="8" THEN Y=Y-5 

500 IF A$="7" THEN Ys=Y-SIX=X-5 

510 IF A$="2" THEN ҮзҮ%5 

520 IF А®%="?" THEN YzY-Si:X»X«5 写真 2 矢印 の 表示 (“MARK”) 
530 IF A$="4" THEN X»X-5 

540 IF А%="1" THEN X»sX-51YsY«5 

550 IF АФа"4" THEN Х=Х+5 

560 IF АФ="3" THEN X=X+5:Y=Y+5 

578 IF Ізі THEN. 00808 "ALR" 

580 IF I»2 THEN GOSUB "CIR" 

590 IF I»3 THEN GOSUB "HER" 


é00 CLS4 e Peto 
610 IF I=1 OR I=3 THEN POSITION X, ҮІРАТТЕКМ Р, ХФ ELSE CIRCLE OG Y), RC 2.22... 
628 GOTO 460 LAN 


өзе CLS4 

640 GOTO 648 

450 LABEL "40" 

668 CLS 

678 LOCATE 4,81!INPUT "イロ 9 127% 2994 (1-7) "1С 
680 CLSICANVAS C, 1,2 

690 IF С<1 OR C>7 THEN 670 
708 SCREEN 0,0,1 

710 RETURN 

720 LABEL "ALR" 

730 IF Х‹@ THEN, Х=@ 

740 IF X>394 THEN X=304 
750 IF Y<24 THEN Y=24 


е 
27. 
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760 IF Y>128 THEN Y=1?8 
770 RETURN 

780 LABEL "CIR" 

7908 IF Х<5 THEN X=5 

808 IF X>315 THEN X»315 
810 IF Ү<5 THEN Ү=5 

820 IF Y»195 THEN Y=195 
830 RETURN 

840 LABEL "HER" 

850 IF ХХ5 THEN X=5 
860 IF X>285 THEN X=285 
870 IF Ү<35 THEN Ү=35 
880 IF Y>1%25 THEN Ys1%5 
890 RETURN 


写真 3 円 の 表示 (“МААК”) 


Ш —9 HOLE 


この プロ グラ ム で は , 3 種類 の 窓 を 開け る こと が で き , ЖОРЖ 
や 周囲 の 色 に よっ て 同じ 場面 で も 異な っ た 効果 を 与え を る こと が で 
きま す 。 

プロ グラ ム を RUN す る と , 背景 色 ( 各 カ ラー コード に 対応 ) と 
窓 の 大 きる (5 段階 ) の 入力 を 求め て きま す 。 入力 終 了 後 画面 は 
背景 色 一 色 に な り , 各 形 の 窓 が それ ぞ れ の サブ ルー チン に よっ て 
描か れ , その 内 部 が 青 で 塗り つぶ きる れ ます 。 この 青 を PAINT 廊 で 
黒 に 変え て スー パー イン ポー ズ す る と , 窓 か の ら ビ デ ォ や TV 画像 
が の ぞ け る よう に な り ま す 。 写真 4 は ハー ト 形 の 窓 か ら の ぞい た 
も の で す 。 あらかじめ ゅ 撮影 し て お いた 写真 を , ビデ オカ メラ で 撮 
WU, デジ タル テロ ッ パ ー で ハー ト 形 の ぞ き 窓 と 合成 し , この 画 
面 を 写真 撮影 する と , 素敵 な ポー トレ ー ト に な り ま す 。 ま た 印画 
紙 に な っ た ハガキ を 使っ て 素晴らし い ラ ブレ ター や 家族 の 近況 報 
告 , 新婚 旅行 か ら 帰 っ て か ら の 挨拶 状 な どい か が で し ょ う 。 


リス ト 2 HOLE 


写真 5 は , 鍵穴 の の ぞ き 窓 で , 何 か 秘密 めい た だ 効果 が 表 わ れ て 
きま す 。 穴 の 大 きる を 1 か ら 5 ま で 変化 きせ せ 。 ビ デオ カメ ラ を を 
れ に つれ て 被写体 に だ ん だ ん 近づけ て いく 〈《 と , より 効果 が 上 が り 
р 

写真 6 は 多角 形 の の ぞ き 窓 で , X1 特 有 の POLY 命令 を 使い , = 
角形 以上 の 多角 形 を 作り 出し て いま す 。 その 場面 に 応じ た 多角 形 
を 使い わけ る と 楽し いで し ょ 5。 

@ ワ ン ポ イン ト テ クニ ッ ク 

この プ ブログ ラム で は , ビデ オ か ら の 映像 が コン ピュ ー タ 画面 の 
端 か ら は み 出 な いよ うに , テレ ビ の 垂直 振幅 CO0MP を 調整 し て お 
いて て だ さい 。 鍵穴 は CIRCLE 文 」LINE 廊 で 描き ます 。 ハ ー ト 
OX, 350 行 の 極座標 を 用 いた オリ ジ ナ ル の 関数 を 使っ て 描き ま 
し た 。 独自 の 図形 に よる ユニ ー ク な 窓 を 作る と 楽し いで す よ 。 バ 
ッ ク カ ラー を 指定 し た と き の , 窓 の 開け 方 の テク ニッ ク を 参考 に 
で Ke 


^ жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


m 
° 


20 “ж x 
30 “w X1 VIDEO UTILITY (HOLE) У. і ж 
40 “x x 
50 “w бер. '83 COPYRIGHT (C) x 
60 “x by Н, ASHIKAGA x 
70 “x x 
BO ”жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


о 
о 
“ 


108 WIDTH 40:CLSICOLOR 7,60 

118 LOCATE 8,2ІРКІМТ"аа SELECT HOLE 
128 LOCATE 8, 6!1PRINT"1 ... KEY HOLE" 
130 LOCATE 8,81!PRINT"2 ,.. HEART HOLE” 
140 LOCATE 8, 10 !PRINT"3 


168 CLSION I GOTO 178,308, 420 
170 ‘KEYHOLE 

188 INIT!PALET!CLS 4 

198 00808 "INP" 

200 CIRCLE (160, 79), 25%5жК, 1 
210 РАІМТ 169,70), 1,1 


220 LINE (160, 80? - (130-5жК, 140 *8XK) , PSET, 1 


230 LINE- (190+5жК, 149+8K) , PSET, 1 
248 LINE- (160, 80), PSET, 1 

258 PAINT(160, 140), 1,1 

260 PALET 1,0 
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s.. POLYGONAL HOLE" 
150 LOCATE 8, 14:COLOR 4:ІМРУТ"НІТ 1-3 KEY 


写真 4 ハー ト の 穴 よ り 有 覗い て 編集 
"H1 IICOLOR 7 


270 LABEL "END" 

280 IF INKEY$*"" THEN 280 

290 END 

300 * 

310 HEART 

320 INITIPALETICLS 4 

330 GOSUB "INP" 

340 FOR А=@ TO 2xx STEP x/400 
350 Е«(50-20жС05 (A) ) XCOS (A) +50 
360 YsRXCOS (A) t XsRXS IN (A) 


388 NEXT А 


400 PALET 1,0 

410 GOTO "END" 

420 “POLY 

430 INITIPALETICLS 4 


450 IF N<3 THEN 440 
468 GOSUB "INP" 


488 PAINT(160, 100), 1, 1 
490 PALET 1,0 

500 GOTO "END" 

510 LABEL "INP" 


530 IF ВС<1 OR BC>7 THEN 520 
5508 IF К<1 OR К>5 THEN 540 


568 COLOR ,BC:CLS 
570 RETURN 


E- ӨСНІ/ТТЕН 


1 コマ ご と に 編集 で きる よう な 編集 機 を 持っ て いな いと , 場面 
の 転換 時 の 画面 の 乱れ が 避け られ ませ ん 。 こ れ を 防ぐ で ぐには, 切り 
換え 時 に コン ピュ ー タ 画面 に 中 継ぎ を 演じ て も ら う 必要 が 生じ ま 
す 。 この プロ グラ ム は , 放送 局 で 使用 し て いる 効果 を X1 で 簡単 に 
行なう た め の も の で す 。 

RUN す る と OPEN と SHUT の 選択 を 求め て きま す 。 あ る 場面 が 
終わ る と き に SHUT を 選び , 場面 が 始ま る と き に OPEN を 選び ま 
す 。 次 に 画面 を 覆い 尽く す 色 を 選び ます 。 こ の と き 背 景色 も 同じ 
色 に な り , VTR 画 面 を 完全 に カバ ー し ます 。 

次 に 画面 は , リス ト 3 の 180 行 か ら 250 行 に ある コメ ント を 表示 
し ます 。 1 か ら 6 の キー で , その 場面 に あっ た SHUTTER を 選ん 
で くだ さい 。 写真 7 は AT RANDOM の モー ド を 選ん だ も の で 
OPEN モー ド に な っ て いま す 。750 行 か ら の タイ マー サブ ルー チン 
を 変更 し て 時 間 間 隔 を 長く と り , VTR か ら の 動物 や 花 の 映像 を 映 
し な が ら ラ ンダ ム に 少し ずつ の ぞ き 窓 を 開け , 名 前 を 当て きる せる 


— 


写真 7 ラン ダム に 穴 を 開け , 場面 を 切り 換え る 。 


379 РВЕТ(160%Хж(1%К/8),60жҮжс1%К/8), 1) 


398 РАІМТ<160,652,1, 11PAINT(160, 120), 1,1 


448 LOCATE 2, 2: INPUT "ナン カッ ケイ FAN "IN 


478 POLY(160, 1800, 40*10XK, 1, 360/N, 90, (М-12ж180%98 


520 LOCATE 2,5:INPUT"BACK COLOR 9 エラ ン テ ^ 27794 (1-7)" BC 


548 LOCATE 2,811NPUT"TT*9 э 12277 クタ "サイ (44-59 ІК 


ーー 


写真 8 SHUTTER 実 行 例 (SCREW モ ー ド ) 


写真 5 HOLE 実 行 例 (KEY HOLE モ ー ド ) 


^. 
с -> 


" — 
写真 6 HOLE 実 行 例 (POLYGONAL € — К) 


と いう 子供 用 CAI や , 家族 向け クイ ズ な ど に 利用 し て は いか が で 
し ょ うか 。 写真 8 は SCREW の モー ド で す 。 中 央 か ら 回 転 し な が 
ら OPEN ま だ は SHUT し て いき ます 。 この SHUTTER の プロ グラ 
ム は , 編集 時 の 使用 頻度 の あっ と も 高い も の の ひと つ で す 。 
@ ワ ン ポ イン ト テ クニ ッ ク 
プロ グラ ム を 実行 する と , す で 左 上 に 青い 四角 が 塗り つぶ る され 
る の が 瞬間 見 を えま す 。 こ れ は 310 行 か ら の サブ ルー チン で , 横 25 ド 
ッ ト メ 縦 40 ド ッ ト の 領域 を GET 文 で 格納 する か ら で す 。 し だ た が っ 
て, この 領域 を PUT 文 で 表示 する こと に より SHUT モ ー ド が , ま 
た 青 を PALET 文 で 黒 に 変え ん る こと に より 0PEN モー ド が 実行 る 
れ ま す 。SHUT モー ド で は , 640X400 ド ッ ト の 領域 を すべ て カバ 
ー し た あと , は み 出 た 映像 を 同色 の 背景 色 で 覆っ て 消し ます 。O 
РЕМ モー ド で は 逆 に 最後 に 背景 色 を 消し , 画面 全体 に VTR の 映 
像 を 映し 出す よう に し て いま す 。SCREW モー ド で , 中 央 か らら せ 
ん を 描 〈 方 法 を いろ いろ や っ て み ま し た が , 780 行 の よう に 次 に 進 
む 方 向 を DATA 廊 で 示す 方 法 が 一 番 簡単 な よう で し た 。 NIC DA 
TA と 移動 方 向 の 関係 を 示し ます 。 


zi 


E 


B] 移動 DATA 対 応 表 
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リス ト 3 SHUTTER 


Y〉 = 
499 
410 
420 
430 
440 
450 
4690 
470 
480 
490 
үзө 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
608 
610 
620 
630 
440 
650 
668 
670 
680 
6908 
700 
710 
720 
730 
740 
750 
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7 жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
“ж ж 
“ж Хі VIDEO UTILITY (SHUTTER) U. 1 ж 
“ж ж 
“ж Oct. ^83 COPYRIGHT «C? ж 
ж by H. ASHIKAGA x 
“ж ж 
^ жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


WIDTH 40! INIT:PALET:SCREEN 0, 0:CLS4 

DIM A126) 

COLOR 7,0:G08UB "BOX":CLS4 

LOCATE 4,10! INPUT"SELECT OPEN (1) OR SHUT (25 "iK 

IF К<1 OR К›2 THEN 130 

LOCATE 4,14! INPUT"BACK COLOR 9 1927“ 72°94 (1-7) "$C 


IF С<1 OR C>7 THEN 156 

COLOR 7,8:CLS 

LOCATE 7,2:PRINT"$$ SELECT MOUVEMENT 4e" 
LOCATE 19, る IPRINT "LEFT TO RIGHT ... 1" 
LOCATE 10,8:PRINT"RIGHT TO LEFT ... 2" 
LOCATE 10,10:PRINT"UP TO DOWN .. 3" 
LOCATE 10,12:PRINT"DOWN TO UP ... 4" 
LOCATE 10,14:PRINT"SCREM ... 5" 
LOCATE 10, 1Ф:РКІМТ"АТ RANDOM ... é. 


COLOR 4!LOCATE 6,2Ө:ІМРУТ"жж HIT 1-6 KEY "$1 

IF 1<1 OR 1>6 THEN 188 

CLS 

ON І GOSUB "LTOR", "L TOR", "ОТОО", "ОТОО", "SCREW", "ATRA" 
IF ІМКЕҮФа"" THEN 296 

PALET!CLS4:END 

LABEL "BOX" 

LINE (0, 0) - (39, 24» , PSET, 1, BF 

GETƏ (8, 0) - (39, 24), AX, 1 

RETURN 

LABEL "LTOR" 

FOR IX=@ TO 319? STEP 40 

FOR IYs0 TO 199 STEP 25 

IF K*1 THEN PALET 0,С 

IF I*1 THEN РОТА (IX, IY? - CIX«*39, IY+24), АУ, РЅЕТ, 1 ELSE PUTA (319 -39 - 1X, 199 -24- 1 
(319-1X, 199-110, 64, PSET, 1 

IF К=1 THEN PALET 1,0 ELSE PALET 1,С 

GOSUB "TIMER" 

NEXT! NEXT 

IF К=1 THEN COLOR 7,0 ELSE COLOR 7,C 

RETURN 

LABEL "UTOD" 

FOR 1Үзй TO 199 STEP 25 

FOR 1Х=@ TO 319 STEP 40 

IF K=1 THEN PALET 0,С 

IF 1=3 THEN PUTA (IX, IY?) - CIX*39, 1ү+24), AA, PSET, 1 ELSE PUTA (319 -39 - IX, 199-24-1 
(319-1X, 199-1Ү), AX, PSET, 1 

IF Кз1 THEN PALET 1,0 ELSE PALET 1,С 
GOSUB "TIMER" 

МЕХТ:МЕХТ 

IF K=1 THEN COLOR 7,8 ELSE COLOR 7;С 
RETURN 

LABEL "SCREAM" 

1Х=40ж4:1Ү=25ж4 

FOR ID=0 ТО 42 

READ D:IF D=1 THEN 1Х=1Х+40 

IF Ds2 THEN ІХзіх-40 

IF D*3 THEN IYsIY«*25 

IF D=4 THEN IYsIY-25 

IF K=1 THEN PALET 0,С 

РОТӘ(1Х, ІҮ) - CIX*39, 1Ү+24), AX, PSET, 1 
IF K*1 THEN PALET 1,0 ELSE PALET 1,C 
GOSUB "TIMER" 

NEXT ID 

IF K=1 THEN COLOR 7,0 ELSE COLOR 7,С 
RETURN 

LABEL "ATRA" 

IX= INT («RNDX8) ж40: IY= INT (RNDX8) x25 

IF K»1 THEN PALET 0,С 

PUTA CIX, ІҮ) - CIX*39, 1Ү+24), АУ, РЗЕТ, 1 
IF К=1 THEN PALET 1,0 ELSE PALET 1,С 
GOTO 7606 

LABEL "TIMER" 


ウト カウ ント が 1 増え ます 。B は ボー ル を 示し , 青い 丸 で 表示 さ 
れ ま す 。 ボ ー ル 4 で スト ライ ク が クリ ア さ れ ま す 。0 は アウ トカ 
ウン ト で , 赤い 丸 で 示さ れ ま す 。 ア ウト 3 で すべ て の ボー ルカ ウ 

О ント が クリ ア さ れ ま す 。 自分 の チー ム の ス ュ ユア, 相手 チー ム の ス 

созун, それ ぞ れ Y, の キー を 押す ご と に 1 ずつ 増え て いき ま 

、 す 。 訂 正 が 生じ た と き は C の キー を 押し , 該当 する キー を 押し て 

いて 上, スコア また は カウ ント が 1 ずっ 減っ て いき ます 。 正 し い 

_ 値 に な っ た と ころ で , 再度 C の キー を 押す と も と の 入力 モー ド に 


B 95С0НЕ WRITER FOR BASEBALL 


on 実況 中 継 の よ ӘДЕ; 
父さん の 草 RA 


に タイ トル が Жашы 1 


の 入力 モー ド に な り ま す 。 自 分 の 8 戻り ます 。 
名 を 入れ て くだ さい 。 た だ し 画面 に ャ アミ とも に 表示 され る の e ワン ポイ ント テク ニッ ク 
с V 写真 9 の よう に チー ム 名 が 表示 る れる の で , リス ト 4 の 730 行 の テー マ 曲 を , 編集 時 に アフ レコ する と 効果 が 
記録 用 タイ トル と し て 背景 に VTR の 場面 を 映し 出し な が ら ス ー パ ト 上 が り ま す 。X1 の 拡大 文字 機能 を ふん だ ん に 使い , 表示 を わか り 
ー イ ン ポ ボー ズ し ます 。 や すく し, カウ ント は 色分け し て 一 目 見 て 区 別 で きる よう に し まし 
適当 な 時 間 記 録 で きた 任意 の キー を 打 5, 写真 10 の ユマ ンド た 。 訂正 コマ ンド が ある の で , 安心 し て 編集 で きま す 。310 行 に IN 
を 表示 きせ ます 。 こ こ は ス ー パ ー イ ン ボ ー ズ する 必要 は な く 〈 く , も KEY $ を 使っ て いま す が , 背景 の VTR 画面 に 応じ て タイ トル の 表 
ちろ ん VTR テー プ に 記録 する 必要 も あり ませ ん 。 コマ ンド キー を 示 時 間 は 一 定 し な い の で , この よう に 任意 の キー で いつ で も 次 の 
入力 する と , 写真 11 の よう に チー ム 名 と スコ ア , ボー ルカ ウン ト 場面 に 移 れ る よう に する と 便利 で す 。 プ ログ ラム を 短く する た め 
が 表示 る れ ま す 。S の キー を 押す と スト ライ ク が ひと つ 増 え , Ж に キー 入力 する ご と に 前 画面 を セク リア し て いま す が , この と き 画 
色 の 丸 で 表示 る きれ ます 。 ス トラ イク 3 で ボー ル の 表示 は 消え , 7 面 が 一 瞬 ま ば た だ たく よう に 感じ る 人 は , 一 工夫 し て みて くだ きい 。 


また 550 行 か ら 600 行 の よう に , CAPS キー 
が ロッ ク し て あっ て も な く て も 表示 が 可能 
で あれ ば , ブログ ラム を 知ら な い 人 で も す 
“Са so 


写真 10 > Ж 
SCORE WRITER 
の コマ ンド 表示 


る 写真 9 
SCORE WRITER 
に よる TITLE 作 製 


リス ト 4 SCORE WRITER FOR BASEBALL XJ 
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118 LOCATE 4, 1211NPUT"THE OTHER TEAM'S NAME "i0%:CLS 
128 CIRCLE (30, 108), 20, Tt CIRCLE (220, 1005, 20,7 
138 PAINT (30, 100), 7, 7IPAINT (290, 1000, 7, 7 GIANTS 8 - 2 CANDYS 
148 CIRCLE (60, 100), 20, 2, 1, 134, 224 - 
150 CIRCLE (60, 180), 19,2, 1, 134, 224 
160 CIRCLE (260, 100), 20, 2, 1, 314, 405 
179 CIRCLE (260, 100), 19,2, 1, 314, 405 
188 CIRCLE (0, 100), 20,2, 1, 314, 405 

190 CIRCLE (0, 1002, 19,2, 1,314, 405 

200 CIRCLE (320, 100), 20, 2, 1, 134, 224 
218 CIRCLE (320, 100), 19,2, 1, 134, 224 
220 CIRCLE (160, -130), 200,2, 1, 240, 300 
230 CIRCLE (160, -128), 190,2, 1, 240, 300 
240 CIRCLE (160, -125), 180, 6, 1, 240, 300 
250 CIRCLE (160, 330), 200,2, 1, 60, 120 


260 CIRCLE (160, 328), 190, 2, 1, 60, 120 写真 11 SCORE WRITER 実 行 例 
278 CIRCLE (160, 325), 180, 6, 1, 60, 120 

288 COLOR4!LOCATE 8, 101CSIZE3IPRINTHO, US ING"& &"irvs 

298 LOCATE 18,12:!PRINT40"--" 

300 LOCATE 16, 14:PRINT#0, USING "8 8,10% 


310 A$*INKEYS$:IF A$="" THEN 310 
320 CLS4!PRINT!COLOR 4 


339 PRINT" تادا‎ g a وا ج سے‎ RR 

340 PRINT" u E] 

350 PRINT" 水 "1COLORGIPRINT" 8 : STRIKE"j1COLOR4IPRINT" ж 
340 PRINT" ж ж 

378 PRINT" X"P!COLORi!PRINT" B : BALL "j:COLORAIPRINT" ж 
380 PRINT" ж ж 

398 PRINT" "ICOLOR2IPRINT" O : OUT  "j:1COLORAIPRINT" ж 
4080. PRINT" ж ж 

418 PRINT" x Y : SCORE ОҒ ж 

428 PRINT" x YOUR TEAM ж 

430 PRINT" x x 

440 PRINT" ж Т: SCORE OF ж 

450 PRINT" ж THE OTHER ж 

468 PRINT" x TEAM x 

470 PRINT" x x 

480 PRINT" x С: CORRECT. ж 

490 PRINT" в 回 

500 PRINT" Балалы 

510 PRINT 


520 PRINT"o@ PUSH 5,8,0, Ү,Т KEY (SCORE +1) eo" 

530 Ss=0:B=0:O=0:Y=0:T=0:z=1 

540 A$=INKEY$ 

550 IF ^%="5$" OR &ó$"s" THEN 8«8%2:0070 620 

568 IF А%="В" OR A$="b" THEN B=B+Z:GOTO 620 

570 IF A$="0" OR A$="o" THEN O=0+Z:S=0:B=0:GOTO 620 

580 IF A$="Y" OR A$="y" THEN Y=Y+Z:GOTO 620 

590 IF A$»"T" OR A$="t" THEN Т«7%210070 420 ; 

600 IF A$="C" OR A$="c" THEN IF 2=-1 THEN Z=+1:GOTO 620 ELSE 2«-1:0070 620 
610 IF A$="" THEN 540 

620 IF 8*3 THEN S=0:0=0+1 

630 IF B*4 THEN B=0:S=0 

6480 IF O*3 THEN О=@ 

658 CLS:COLOR 7:CSIZE11!LOCATE 2,01:!PRINT #0, USING"& & ^ - W^ & "ҮҮ ТО 
$:CSIZE2 

660 LOCATE 26,1ó6!COLOR 7:PRINT #0, "9 "4ICOLOR é:FOR 1:1 TO S:PRINT "@"í NEXT 
678 LOCATE 26, 18:COLOR 7:РКІМТ #0, "В "ICOLOR 1!FOR Ізі TO B:PRINT "G"i1!NEXT 
680 LOCATE 26,20:!COLOR 7:PRINT #@, "О "IICOLOR 2!FOR I=1 TO ОІРБІМТ "G"i!NEXT 
699 GOTO 540 

708 LABEL "TITLE" 

710 CSIZE 34COLOR る !LOCATE 4,8:PRINT #0, "ЧТК SCORE WRITER " 

720 LOCATE 8, 12:ІРКІМТ #0, "FOR BASEBALL" 

730 TEMPO 200:MUSIC"V1504C3-BS5C3DSC3 -BS5C3DSC3 -BSC3E 1Ré6E71U1306C3 -B5C305C3 -B5C3D5 
C3-BSCSE1RóE7" 

748 IF ІМКЕҮФ="" THEN 740 

750 RETURN 


て も , アン テ ナ を つない で 今回 の プロ グラ ム と スー パー イン ポー 


お わり に Жү, いろ いろ な 遊び 方 を 考え て みて くだ さい 。 次 回 は 茶 本 構成 で 
前 回 と 今回 の 2 回 に わた っ て VTR の 編集 に 便利 な ユー テイ リティ の 楽し み 方 「TV と 遊ぶ 方 法 」 を 紹介 し ます 。 どん な も の が と び 出 
ブリ ログ ラム を 紹介 し まし た が 。 い か が で し た で し ょ うか 。 せ っ か すか お 楽し み に 。 


《 の X1 の スー パー イン ボー ズ 機 能 で す 。 VTR 編集 まで いか な く 
128 ohicz 19845. 


“ 
a 


ブロ グラ ム を を 作る ブロ グラ ム 


ELDER MAN 


ちょ っ と 変わ っ た プロ グラ ム を 作っ て み 
だ た の で 紹介 し た いと 思い ます 。 プ ログ ラム 
を 作る プロ グラ ム , 自己 増殖 プロ グラ ム と 
いう と SF っ ぱく て 絶 力 を 感じ な いで は いら 
れ ま せん ネ 。X1 の HuBASIC に は 多種 多様 
な 命令 が 用 意 き る きれ て いる た だめ, この よう な 
目的 を 達成 びき る プロ グラ ム に 挑戦 し て み 
FUR: 


プロ グラ ム を 作る プロ グラ ム と いっ て も 
今回 の も の は , 簡単 に 言っ て し まえ ば プロ 
グラ ムレ ス 言 語 あ る い は 簡易 言語 と いう こ 
と に な る で し ょ うか 。X1 を 電卓 の 代わ り に 
使 お うと いう 人 や , 簡単 な 計算 の プロ グラ 
ム を いち いち 作る の が 面倒 ど と いう 人, š 
だ た は BASIC を よく 知ら な い 人 に は 便利 な も 
の だ と 思い ます 。 

フロ ー チ ャ ー ト を 書い て , 順 々 に 入力 し 
て いけ ば , プロ グラ ム が 自動 的 に 作成 され 
る と いう も の で す 。 機 能 を 順に 紹介 する と, 
INPUT 入力 )………… 変数 名 を アル ファ 
ペ ベット で 入力 し ます 。 
(計算 ) ——X «€ 計算 式 を 変数 名 = 
式 と いう 形 で 入力 し ます 。 
PRINT. (出力 )………… 画面 に 表示 し た い 

変数 名 を 入力 し ます 。 

この 3 つの 機能 ど だけ で も , 繰り 返し 使う 
ょ うな 計算 に は 便利 で す 。 

た と えば , リン ゴ が 1 個 200 円 , ミ カン が 
1 個 80 円 として, それ ぞ れ 何 個 か 買っ た と 

合計 金額 を 求め る と いう の は , 


CAL 


(入力 ) RINGO 
(入力 ) MIKAN 
(計算 ) ANSWER=RINGO * 200+ 


MIKAN ж80 

(出力 ) ANSWER D 

と する だ け で ,。- デ ロ グ ラム が で き て 。 リン 

ゴ の 個数 , ミカ ン の 個数 を 開い て き て , šT 

算 し , 結果 を 出力 する と いう こと が で きま 

す 。 計 算 の と ころ に は , 何 回 でも また 複雑 

な 式 で も 入れ る こと が で きる の で , これ だ 

け の 機能 で も 結構 便利 だ と 思い ます 。 

機能 ほし し て は この 他 に , 

FOR-NEXT (繰り 返し ) …… 繰り 返し の 
始め の と ころ で 指定 する と , Ж 
り 返 し に 使う 変数 名 (単純 に 繰 
り 返す だ け な ら 1 か 何 か 適 当 な 
変数 名 で よい ) と 回 数 また は 回 
数 を 与え る 変数 や 式 を 入力 し ま 
す 。 繰 り 返 し の 終わ る と ころ で 
は NEXT を 指定 し ます 。 

ІЕ-ТНЕМ--ЕІ5Е (分 岐 文 ) …… 条件 を 
式 な ど で 示 すこ と に より , 計算 
方 法 を 変更 し た りす る こと が で 
きま す 。 分岐 する 先 を 示す た め 
に は , 次 に 示す LABEL の 考え 
方 を 必要 と し ます 。 

LABEL (ラベ ル ) ……… 計算 の 処理 工程 
の 区 切り に つけ た り , 分 岐 文 に 
よっ て 示さ れる ジャ ンプ 先 を 表 
わす た だ ため に LABEL (ラベ ル ) 
名 を アル ファ ベッ ト で 入力 し ま 
+ 

GOTO ( 無 条件 ジャ ンプ ) …… 計算 な ど で 

共通 に 使う よう な サブ ルー チン 
へ 分 岐 す る た め の 命 令 で , ジャ 
ンプ グ 先 は LABEL 名 で 示し ます 。 

(配列 変数 ) ТТТ 多少 難し い 計 

算 プ ログ ラム を も 組め る よう に 


DIM 


配列 変数 を 扱え を る よう に し まし 
Ro 配列 変数 の 使い 方 に つい て 
は , マニ ュ ア ル を 読ん で くだ さる 
{УҘ 
以上 の , INPUT, PRINT, FOR 一 NEX 
T, IF- THEN—ELSE, GOTO, DIM X 
が 使用 で きれ ば , 計算 で どき な いも の は は ほ と 
ん ど な い と 言っ て も いい てく らい だ と 思い ま 
т. 


実際 の 使用 方 法 に つい て 説明 し ます 。 ま 
ず プ ログ ラム を RUN + š+, 画面 に この 
プロ グラ ム の 使用 方 法 と 注意 事項 が 表示 さ 
nit. 注意 事項 ほし いう の は , 変数 名 に は 
アル ファ ベッ ト を 使う こと (2 文字 目 以降 


は 数 字 で も いい ), GOTO と か RUN と か の 
BASIC の 予約 語 は 変数 名 に 使用 びき な いと 
いう こと で す 。 ま た 変数 名 の 最後 に $ を つ 
けれ ば 文字 変数 と し て , 韻 や つけ れ ば 倍 精 
度 の 数 値 変数 と し て , % を つけ れ ば 整数 型 
の 変数 と し て 扱う こと が で きま す 。 

大 文字 を 使う の で ,CAPS LOCK し て く 
だ きい 。 

どれ か キー を 押す と , モウ イチ ドー(R) 
サイ ショ カラ (1), シュ ウ モ セイ ニテ (D), 


アン ナイ ニテ (A), #7) = (Е) と 表示 され 
る の で , 1 を 入力 し ます 。 プ ログ ラム 作成 


の モー ド と な り , 画面 で は 最上 行 に タイ ト 
ж, 最 下 行 に コマ ンド の 入力 案内 が 表示 さ 
れ ま す 。 


D = 配列 変数 の 定義 (DIM) 
I = 入力 変数 名 の 入力 (INPUT) 
C= 計 算式 の 入力 (CAL) 


P = 出力 変数 名 の 入力 (PRINT) 
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プロ グラム の 概要 


(ом) -— | 
(GOTO) 無 条件 ジャ ン i 
(END = ブロ グラ ム 作 成 モ кт 


タイ トル 
BASIC の ワー クエ リア 確保 と エラ ー 発 生 時 処理 
初期 設定 ( 2 回 目 か ら は 自動 削除 ) 
作成 , 新 プ ログ ラム , 案内 へ の 分 岐 
o 作成 モー ド の 画面 表示 
| 。 新 プ ログ ラム の 行 番号 セッ ト 
c] コマ ンド 入力 と 各 処 理 へ の 分 岐 
(INPUT) 変数 名 の 入力 処理 
(CAL) 計算 式 の 入力 処理 
(PRINT) 出力 変数 名 の 入力 処理 
(FOR) 繰り 返し の 設定 
(NEXT) 繰り 返し の 終わ り 


(IF) IF 一 THEN 一 ELSE 処理 


F = 繰り 返し の 始め (FOR) 

N 繰り 返し の 終わ り (NEXT) 

M 三 分 岐 文 の 作成 (IF~ THEN) 
G = 無 条件 ジャ ンプ (GOTO) 
L= ラ ベル 名 の 入力 (LABEL) 


= プロ グラ ム 作 成 終了 (END) 

Command と プルー の 文字 で 表示 され, 2 
ー ソ ツル が 点 減 し た ら こ れ ら の コマ ンド を 入 
力 し ます 。 間違え だ た ら Z” を 入力 すれ ば 
コマ ンド は キャ ン モ セル され て また Command 
の 表示 に 戻り ます 。 リ ン ゴ と ミカ ン の 例 で 
は , 入力 の と ころ を 1, 計算 の と ころ を C, 
出力 の と ころ を P と すれ ば よく , 最後 に 
を 入力 する と RINGO ニ と 聞い て きま す 。 こ 
れ は すでに で き あ が っ た プロ グラ ム が 動い 
て いる も の で す 。10 個 と 入力 し て や れ ば 次 
に MIKAN= と 聞い て きま す 。 同様 に 10 個 
と 入力 すれ ば , 計算 きれ て TANSWER = 2800 
と 表示 きれ て 答 が 得 ら れ ま す 。 違う 数 で 再 
計算 の と き は R を 入力 , ا‎ 
直す な ら ば 1 を 入力 すれ ば OK で す 。 ここ 
E を 入力 する と デキ タ プロ グラ ム 7 
SAVE シマ スカ ? (Y/N) と 聞い て 〈 
る の で , 作っ た プロ グラ ム を 保存 する な ら 
ば Y を 入力 し て くだ さい 。 こ の プロ グラ ム 
を 作る プロ グラ ム は 消え て , 作っ た プロ グ 
ラム だ けが 残り ます 。 リ スト を 出せ ば , 20 
00 行 か ら 作 られ た プロ グラ ムリ スト が 表示 
sni. 

D を 入力 する と, 作っ た プロ グラ ムリ ス 
ト が 表示 る され ます 。 こ こ で は , 不都合 な と 
ころ を BASIC プ ログ ラム 上 で 修正 する こと 
が で きま す (BASIC が わか ら な い 人 は , も 
う 一度 初 めか ら や り 直 すし か あり ませ ん ネ , 
あし か ら ず )。 


130 он CZ 1984.5. 


1 か ら N ま で の 数 の 総和 を 求め る プロ グ 
ラム の 作成 例 を 紹介 し ます 。 
コマ ンド 
(I) N 
(F) I 
N (N 回 繰り 返す ) 


(数 の 入力 ) 

(I と いう 変数 , 1 ずっ 増加) 
(С) ANS=ANS 十 I (N ま で 加え る ) 
(N) (繰り 返し 終わ り ) 

(Р) ANS ( 答 を 表示 ) 

(Е) (終了 ) 

これ だ け の 操作 で 

2010 INPUT N=”, N 

2020 FOR I=1 TO N 

2030 АМ5-АМ5-І 

2040 NEXT 

2050 PRINT “АМ5-” ; ANS 

と いう プロ グラ ム が 作ら れ ま す 。 WMEZ 

ログ ラム に な る と , ラベ ル 名 を つけ 忘れ る 

こと が ある の で , その 場合 は , BASIC 上 で 

ラベ ル 名 を 追加 すれ ば よい と 思い ます 。 


BASIC で BASIC の プロ グラ ム を 作る と 
いう こと は , これ まで な か な か で き な い こ 
と で し た 。X1 で 可能 に な っ た の は KEY0, 
と いう 命令 の お か げ で す 。 プ ログ ラム リス 
ト を みて いた だ だ けれ ば わか る よう に , 多用 
し て いま す 。 160171: КЕҮО, “RUN” + CH 
R$ (13) と ある の が 最初 で 、 何 を し て いる 
か と いう と , ブロ グラ ム を 初め て RUN し た 
と き の 初 期 値 の モッ ト を 行なっ て いま す 。 
170 行 に DELETE 100—170 55 X 5t, 
ここ まで プロ グラ ム が 走っ て くる と 。 リス 


ト の 100 行 か ら 170 行 まで が 削除 る きれ て し ま 
いま す 。KEY0, 文 が な いと プロ グラ ム は こ 
こ で STOP し て し まい ます が , KEYO, X 
の あと に "RUN" 十 CHR $ (13) と ある だ た だめ, 
再び プロ グラ ム は 頭 か ら ス ター ト し ます 。 
2 度目 は も う 100 行 か ら 170 行 まで は な く な 
っ て いる の で 180 行 以上 の 行 へ プロ グラ ム は 
進み ます 。 

プロ グラ ム を 作る 部 分 は , 1900 行 か ら 1920 
行 ま で で , や は り KEY0, OLI: “ВОМ” 
+CHR$ (13) と いう の が あり ます 。 AAAA 
$ と いう の が 新しく 作る プロ グラ ム の 部 分 
で 行 番号 と プロ グラ ム が 代入 きれ て いま す 。 
COLORO と し て ある た め CRT 上 で は 見 え 
ませ ん が , プロ グラ ムリ スト を 登録 きせ る 
と き に [d] を 押し て いる の と 同じ こと を こ 
こ で 行なっ て いま す 。 新しい プロ グラ ム の 
登録 が 終わ る と 再び スタ ー ト し て , 何 回 も 
同じ 作業 を 繰り 返し て , 1 行 ず つ 新 し い プ 
ログ ラム を 作成 し て いき ます 。 

プロ グラ ム を RUN す る と すべ て の 変数 が 
クリ ア さ る れ て し まう た め , 新しく 作る 行 番 
5, 作成 モー ド と 実行 モー ド と の 区 別 、F 
OR-NEXT に よる 繰り 返し ルー プ の 完結 確 
認 の た め の パ ラメ ー タ な ど に つい て は , BA 
SIC TEXT エ リア 外 に お 〈 必 要 が あり ます 。 
80 行 で LIMIT &HFEFO と し て いる の は こ 
の た めで す 。 


プロ グラ ム を 作る プロ グラ ム が も っ と 高 
級 な こと を で きれ ば , SF の 世界 で の こと が 
ある い は 現実 に な る か も 知れ ませ ん 。 ど な 
た か , 独創 的 な アイ デア で プロ グラ ム を 作 
る プロ グラ ム を 発展 させ て み ま せ ん か 。 


リス ト 


258” ONLY CALCULATION VERSION 


1 の “============================================================= v 
20 < 

38 ^ AUTO PROGRAM (Proto Type 4) Copyright 1984 by ELDER МАМ 

40 * 


68 ^ : 

78 イン ニニ エニ ニニ ニニ ニニ エニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ デニ デニ Ы 

88 LIMIT &HFEF& 

90 ON ERROR GOTO ?000 

100 * 

119 eene INITIALIZE ----- 

128 ^ 

130 WIDTH 88:COLORG 

140 DEF KEY 5, "GOTO 80068" «СНК%<13) 

150 POKE &HFEF8,0:POKE &HFEF1,3:POKE &HFEF2, 128 

160 KEY8, "RUN"+CHR$ C135 

170 DELETE 100-178 

180 * 

завета TITLE 6 GUIDE ----- 

200 * 

203 ОМ PEEK (&НҒЕҒ 1) GOTO 295,2000, ?100 

205 IF PEEK (&HFEF1)<>8 THEN 240 ELSE POKE &HFEF1, 1 ys 

218 CONSOLE:CLS:COLORS:LOCATEO, 0:PRINT"EEEENENEE AUTO PROGRAM (Proto Туре 4 

oPyright 1984 Ьу  &A.SHIRAI FERES 科 

228 LOCATE0,24:PRINT"D=DIMA I=INPUTA C-CAL. 4 P=PRINT A F*FORA N=NEXT A4 тм ereor 

04 L=LABELA E-END A"; ^ 

238 CONSOLE 1,23 
^ 


256 /--<-- POINTER SET ----- 
260 ” 

270 1111=РЕЕК (&HFEF 0) 

275 1111=1111+1:РОКЕ &HFEFO,IIII 
EU - 

ТТС neut COMMAND eme 


281 COLOR1:PRINT CHR$(305;"Command "i 
282 ННННФ= ІМКЕҮФ (1) 

283 IF ННННФ= "1" THEN 308 

284 IF HHHH$s"C" THEN 400 

285 IF HHHH$-"P" THEN 5060 

286 IF HHHH$-"F" THEN 608 

287 IF ННННФ= "М" THEN 788 

288 IF ННННФ= "М" THEN 8060 

289 IF ННННФЕ "0" THEN 1000 

291 IF ННННФ= "6" THEN 1100 

292 IF HHHH ま ="E" THEN 12060 

293 IF HHHH$-"L" THEN 1300 ELSE 282 


298 '----- INPUT VAR. NAME ----- 


380 COLOR4 : PR INT "ペン スウ メイ э ニュ ウリ ョ ク (INPUTO":BEEP 
319 LINPUT "",HHHH$ 
320 IF HHHH$2"/" THEN 281 
3380 IF ASC«LEFT$(HHHH$, 122 «65 OR ASCK(XLEFT$(HHHH$, 1222908 GOSUB 1400:GOTO 300 
340 AAAA6=STR$(XIIIIWS10+2000)+" INPUT "*CHR$(34) *HHHH$*CHR$ (61, 34, 44) *HHHH$ 
350 GOTO 19808 

の 


gogo oo INPUT How to Calculation ----- 


480 COLORé:PRINT"74975 シキ 9 ニュ ウリ ョ ク (CÓL.)":BEEP 

419 LINPUT "",HHHH$ 

428 IF HHHH$2"/" THEN 281 

425 IF INSTR(HHHH$, "=")=@ GOSUB 1700:GOTO 281 

4380 IF ASC«(LEFT$(HHHH$, 1) ) «65 OR ASCK(LEFT$(HHHH$, 1) > >90 GOSUB 1400:GOTO 400 
448 A6AA$-STRSCOIIIX10*2000D0*" "4HHHH$s 


450 GOTO 1900 d 
497 ” x ае. 
498 '----- INPUT PRINT VAR. NAME ----- TPA УЧР 
499 * ] .. 


508 COLORS3:PRINT" ヒ ョ クシ * ペン スウ メイ э ニュ ウリ ョ ク (PRINT)":BEEP 

510 LINPUT "",HHHH$ 

520 IF HHHH$-"/" THEN 281 

530 IF ASC 1 ЕҒТФ‹ННННФ, 122 «65 OR ASC (LEFT$ CHHHHS, 122278 GOSUB ЕТТІ 

540 A&6^6A$-STRSCOIIIDX«1042000)*" PRINT "+СНЕФ (34) +НННН®+СНЕ% (619: 

$550 GOTO 1900 
, 


598 “----- INPUT LOOP NO. ----- 


600 CDLOR7:BEEP PR INT:PR INT "クリ カエ シー ニノ АУД? メイ ñ (FOR - › = ":LINPUT 

618 IF HHHH$-"/" THEN 281 “а 
620 IF ASC (LEFT$(HHHH%, 122 «65 OR ASC(LEFT$(HHHH$, 12) 298 GOSUB 1400:60 
638 BEEP:PRTINT" ク リカ エ シ 2 327 ñ (TO -) = "ILINPUT LLLL$ 
640 IF LLLL$-"/" THEN 281 i 
658 ММММ=РЕЕК (&HFEF2) : MMMM=MMMM+ 1 : POKE &HFEF2, MMMM | 
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668 AAAAS=STRS (1111X19+2088) +" FOR "+HHHHS+CHRS (61, 495+" TO "+LLLL$ 
678 GOTO 1708 
697 ° 

498 '----- LOOP END (NEXT) ----- 

699 * 

788 COLORT:BEEP:INPUT"A-2* #7) (NEXT) ? (Y or /)",HHHH$ 

718 IF HHHH$-"/" THEN PRINT:GOTO 281 

728 IF PEEK(&HFEF2)-128 GOSUB 1499*GOTO 281 

738 ММММ=РЕЕК (&HFEF2) :ММММ«ММММ-1:РОКЕ &HFEF2,MMMM 

748 AAAA6=STR$(IIIIX10+2000)+" NEXT" 

758 GOTO 1906 

797 * 

798 '----- IF - THEN - ELSE ----- 

799 * 

868 COLORS:PRINTIPRINT"n224 フン キ (IF - THEN - ELSE -)"1BEEP 

810 PRINT"n22?4 »*a?"7» j| "ILINPUT ННННФ 

820 IF HHHH$2"7/" THEN 281 

830 IF ASC(LEFTS(HHHH$, 1) (45 OR ASC«LEFTS(HHHHS, 12) 298 GOSUB 1400:0070 gee 
848 COLOR3 ょ PRINT" フ バン キ サキ ノ LABEL メイ マク N ケイ サン 7432" BEEP 

850 PRINT"LABEL メイ 2 トキ ñ "iCHR$(34,32,34) 1" 9% 22У9%29794" 

868 PRINT"YES ノ ト キ ; "ILINPUT "",LLLL$ 

870 IF LLLL$-"/" THEN 281 

880 PRINT"NO 2 hf ( 232 ナラ М э ニュ ウラ リョ ク 2% "ILINPUT KKKK$ 

899 IF KKKK$-"/" THEN 281 

9900 IF KKKK$-"N" THEN KKKK$-"" ELSE KKKK も や =" ELSE "«KKKK$ 

910 AA6^66$-STR$(OIIIX10420000*" IF "*HHHH$*" THEN "*LLLL$«*KKKK$ 

928 GOTO 1700 

997 ' 

998 “----- DIM ----- 


1600 COLOR7 了 IPR INT "М/у ヘン スウ / テイ キリ 

1010 PRINT" シ ョ シキ = ヘン スウ メイ (№), ヘン スウ ファ メイ (L, MD... 。 "BEEP 

1020 LINPUT "",HHHH$s 

1030 IF HHHH$*"/" THEN 281 

1035 IF INSTR (HHHH$, " ("> =0 OR INSTR (HHHH$, ")"2-0 GOSUB 18890:G0TO 1000 

1040 IF А5СЧ-ЕРТФ(ННННФ, 122«65 OR ASC(LEFT$(HHHH$, 122 >90 GOSUB14090:GOTO 1000 


1050 AA&^5^$-STR$(OIIIIX«10*200050 +" DIM "*HHHH$:GOTO 19060 
19v? ^ 

IE etr 0070: ==» 

107977 


1190 COLOR6:BEEP:PRINT"A4»* 3277 »*v*77* (GOTO)" 

1110 INPUT"LABEL NAME = ";HHHH$ 

1120 IF HHHH$-"/" THEN PRINT:GOTO 281 

1130 IF ASCK(LEFT$(HHHH$, 122 «65 OR ASC(LEFT$(HHHH$, 1) ) >90 GOSUB 1500:GOTO 1100 
1148 AAAAS=STR$(IIIIx10+2000)+" GOTO "*CHR$s(34) *HHHH$*CHR$ (345 

1158 GOTO 1908 


1198 '----- END & CAL.START ----- 


1200 IF PEEK (&HFEF2) 2128 THEN 12360 
1218 COLOR2:PRINT"ERROR !!":ВЕЕР 
1220 PRINT "クリ カエ シ / 47) N° ナイ (NEXT 27 74) !'*:PRINT:GOTO 281 
1238 АаАбФе57К%с1111ж10%2000)%" GOTO 88000":POKE &HFEF1,2 
1240 GOTO 1988 

2 


1300 COLORS :BEEP: INPUT"LABEL / 77I = ",HHHH$ 

1310 IF HHHH$="/" THEN PRINT:GOTO 281 

1320 IF ASC(LEFT$(HHHH$, 122 «65 OR ASC (LEFTS (HHHH$, 122298 GOSUB 1500:60T0 1300 
1330 AAAA6=STR*$(IIIIS10+20800)+" LABEL" +СНКФ (34) *HHHH$*CHR$ (34) 

1348 GOTO 1908 


1398 “----- ERROR MESSAGE ----- 


1480 COLOR2:PRINT "ERROR !!":ВЕЕР 
1418 PRINT “ペン スウ メイ ñ アル ファ ペット 92% !! "RETURN 
1599 COLOR2:!PRINT "ERROR !!":ВЕЕР 
1518 PRINT "LABEL アイ ñ アル ファ ベット 2% !!":RETURN 
1680 COLOR2:PRINT "ERROR !!":ВЕЕР š 
1618 РКІМТ"2Х42 スル FOR 2% アリ マセ ン !'"IPRINT:RETURN 
1780 COLOR2:PRINT "ERROR !'":BEEP 
1710 PRINT" シ キ / ケイ サン p° ラテ "キマ セッ !!"IPRINT:RETURN 
1808 COLOR2:PRINT "ERROR !!":ВЕЕР 
1810 PRINT" シ ョ シキ p° 97797 イマ ス ''!"IRETURN 

4 


1898 ”----- MAKE PROGRAM ----- 
1988 COLOR 9 


1918 KEYO, AAAA$+CHRS (13, 30, 30, 26) + "RUN" +CHR$ (135 
1920 END 


28000 COLOR7:CONSOLE:CLS : — 
2902 РКІМТ"жжжж Auto Program Calculation КОМ & RESULT by Proto 4 жжжж" 


132 onwz 1984.5. 


20885 CONSOLEi,23:COLOR7:PRINT 
7997“ 

7998 “----- ВЕТВҮ ? ----- 

7999 ” 

80800 BEEP:BEEP:BEEP Ñ 
8030 COLOR4:PRINT "Input ! モウ イチ ト = (G0, 9492727 (1), シュ ウ セ イ = (D), アン ナイ = (A) , オフ リ = CE) " 
8040 HHHH$=INKEY$ A 

8850 IF HHHH$="A" THEN 9100 

8060 IF HHHH$="R" THEN CLR:GOTO 2008 

8070 IF HHHH$="I" THEN 8100 

8080 IF HHHH$-"D" THEN 8208 

8090 IF HHHH$="E" THEN 8400 ELSE 8040 

80?7 * 

8098 ^----- INITIALIZE ----- 

8099 + 

8108 POKE&HFEF6,8:POKE &HFEF 1, Ө:РОКЕ &HFEF2, 128 

8148 КЕҮӨ, "GOTO 10"+CHRS (13) 

8150 DELETE 2010-7990 

8197 ” 

8198 “----- PROGRAM DEBUG ----- 

8199 * 

8208 CONSOLE:CLS:COLOR7:PRINT"EEMNE — BASIC Program Debug . by Screen Edit Ш 
L. N 
8240 ВЕЕР 

8258 COLORS:PRINT" Program 9 シュ ウフ セイ シテ クタ “サイ !" 

8260 COLORS:PRINT" Screen 9” 7495 CR キー э オシ テ クタ "サイ !" 

8278 COLORS:PRINT" Program List 2" ナカ トイ 74 ñ BREAK キー 9% M72." 

8280 COLOR3:PRINT" 9%%) List = 244 トキ 、 2^*3 422 トキ ñ FS キー 9 195 297941" 
8298 COLOR2:PRINT" *V3 キー э オシ テ 72*94 ! ":ВЕЕР 

8300 IF ІМКЕҮФ="" THEN 8300 

8310 COLOR7:LIST 2010-7990:ЕМО 

8397 ' 

8398 '----- END ----- 

8399 ” 

84800 COLORS:PRINT"2**2 2*07*54 9 SAVE シマ スカ ? (Y/ND" 

8418 HHHH$*INKEY$:IF HHHH$*s"" THEN 8410 

8420 IF ННННФ= "М" THEN END 

8425 COLOR7:PRINT'7252 2*02*54 2*7 p° ノコ リマ ス !"iBEEP:PAUSE 56 

8430 KEYG, "GOTO 8450" *CHR$ (13) 

8440 DELETE 7997-8440 

8450 KEYO, "GOTO 8470" *CHR$ (13) 

8460 DELETE 10-2005 

8470 КЕҮӨ, "GOTO 8490"*CHR$(13) 

8480 DELETE 8450-8480 

8498 KEYG, "8000 END"*CHR$(13)*"GOTO 8495"+CHRS (13) 

8492 DELETE 8498-8472 

8495 KEYO, "2000 '----- NEW PROGRAM ----- " 4CHR$ (13) 

8500 DEF KEY 5, "RUN" *CHR$ (13) 

8510 CONSOLE:CLS : 
8520 DELETE 8490- ; : NV ESSET RATING 
8997. * D 

8998 '----- ERRROR MESSAGE ----- 

8999 ' 

9000 COLORi:PRINT:PRINT"ERROR 7% アリ マス 。 2*07*54 з ミナ オシ テ クタ サイ |" 

9010 IF ERR=11 THEN COLOR3+PRINT" シ キー / ケイ サン 9% 0 p° 2*2A* = アリ マセ ンカ ?":00Т0 өгө 
9820 IF ERR-8 THEN COLOR4:PRINT"LABEL n 22*»2 ツケ ラ レ テ イマ スカ 2?":GOTO 9040 

9030 IF ERR=? THEN COLOR5+PRTNT"N イ レツ ^»22 ノ 24% э 7499 25*94 '":GOTO 9060 
9040 IF ERR=13 THEN COLOR7:PRINT"t$*^722 k RIAIR? ノ 2^*' 9 9929774. "GOTO 9068 
9045 IF ERR=2 THEN COLORS:PRINT"»t / 22% 7% チカ ドッ テ イマ セン カ ?" 

9058 COLORé:PRINT"^222/4 = BASIC ノ 323° ñ アリ マセ ンカ ? " 

9060 COLOR2:PRINT"hM*V3 キー э オシ テ 22*94 !":ВЕЕР 

9898 HHHH$=INKEY%$: IF HHHH$-"" THEN 9090 ELSE RESUME 8000 

9097 ' 

9098 “----- GUIDE ----- 

9099 * ; : 
9108 CONSOLE:CLS:COLORS:PRINT'ENMNMME AUTO PROGRAMMING GUIDE for Proto Туре 4 - 
by A.SHIRAI NENNEN"IBEEP ' 

9110 COLOR7:PRINT:PRINT"2VLh BASIC 2*02*54 э 774 ファ ログ ラム 972." 
9128 COLORS:PRINT:PRINT"BASIC / INPUT,PRINT,FOR-NEXT, IF-THEN-ELSE,GOTO / ステー トメ ント 


9130 PRINT" ツ カッ テ 2*07*56 9 ーッ クリ マス se " 
9140 PRINT"GOTO P IF-THEN-ELSE 7° / $*v22* サキ ñ LABEL メイ 9 977 シメ シマ ス 。" 

9150 COLOR4!PR INTIPR 1NT "ペン スウ メ ァ イ Iù BASIC 2 ar22* э 292942 アル ファ ベト ッ ト ラ come 
91608 PRINT "マタ 、 ヘ ンス ウメ イ 2 アト ニ %,%,7,9 ツケ ル コト カ " テ "キマ ス 。" 

9178 PRINT" Ф-жу” ヘン スウ 、 W-h*4t4h*. = セイ スウ " . 

9180 PRINT "СА (7472) Ù ペン スウ = シキ 7 29% 2% 217087 ут." 
9190 COLOR1IPRINTIPRINT "Command" tCOLORS:PRINT" ファ トニ 1 apu ç È 
F (FOR), NXNEXTO , MCIF) , G (GOTO) s L (LABEL? 

9195 PRINT" E (END) 9 ニュ ウリ ョ ク у?29%94." SA г. 22. 
9208 COLOR1:PRINT"Command"; :COLORS:PRINT" / トリ ケシ ñ / キー 5 ニュ リョ ク シテ ブタ 
9210 COLORA:PRINT:PRINT"2* ФРЛ" »2 ファ ログ ラム ñ BASIC ТЕХТ у“ з? 97 $a?t4 322^ 
9220 РКІМТ"7°07° 54 ñ 2010 t*a? カラ 22/72. 2018 #° з7 カラ アト э vi?t4 > 1 
9230 COLOR3:PRINT:PRINT"CAPS (ОСК シテ 227794" 2 
9258 COLOR2:PRINT:PRINT"32/ 3" атыу" KOLN キー 9 オシ テ クタ "サイ ! "BEEP 
9260 IF INKEY$-"" THEN 9260 ELSE 8000 7 


LIU 


م وړ 


Ф 


プロ グラ ム を 作る プロ グラ ム 133 


°. 


ファ ンク ショ ンチ ェ ン ジ 香川 次朗 


Е7][Е9] イン サー トモ ー ド に な っ て いま 
す の で , その まま 数 値 を キー イン で き 
$1. 


HuBASIC の ファ ンク ショ ン キ ー を 好み F1 
の も の に 変更 し た あな た 独自 の BASIC 
TAPE を 作る プロ グラ ム で す 。 

画面 に 表示 され る, 赤い 囲み の 中 を 好き 


BASIC 領 域 を 最大 に し て , プロ グラ 
ム を LOAD, RUN し ます (マシ ン 語 プ 
ログ ラム を 使っ た あと で も Ош of me 
mory error が 出 ま せん )。 


な も の に 変え て いっ て くだ さい 。 [F4| 文字 な ど を 初期 化し , 80 字 モー ド で 
ちな み に 私 の 作っ た 例 は , リス ト を 出し ます 。 
リス ト 


FUNCTION KEY CHANGE PROGRAM 
*84.2. 12 Ьу Jiro Kagawa 


Yamaguchi Rousai Hospi tal 


*040050N- 
MOEN EE を i 


CLEAR &HFC800 
INIT!WIDTH 493CLS4 
REPEAT OFF:KBUF ON:DEFSTR А:ОМ KEY GOSUB 480 
POKE &Н1А2,&НВ7 
FORI=0 TO 8e 
READ A:B=VAL ("&H" +A) :РОКЕ &HFE00+I,B 
C=C+B 
NEXT 
FORI=0@ TO 15% 
100 POKE &НЕС42+1,@ 
110 NEXT 


(F10 プロ グラ ム を SAVE す る し とき 。, 
SAVE“? 7 4 wv 3.— h” +[Е10] 

と すれ ば , 自動 的 に 2 回 SAVE し て , 

最初 の プロ グラ ム を ベリ ファ イ し ます 。 

@[Е4], (Е5ІЗ, シフ トク リア キー が 入っ 

て いる の で , た と ぇ え リス ト の 行 中 に カー ソ 


ル が あっ て も すでに 実行 で きま す 。 


128 IF С‹›8794 THEN PRINT"DATA CHECK SUM ERROR":REPEAT ONIEDIT 660 


FUNCTION CHANGE PROGRAM" 


138 A=CHR%(34):PRINT" 
140 PRINTSPC (13) "HuBASIC С28СВӨХ" 
150 PRINT#0" KEY 1,"*A*"LIM. &HFEFF:R. "+CHR$% (94, 13, 34) 
160 РЕІМТЊӨ" KEY 2, "+A+ "LOCATE ////////"жа 
178 PRINT#O" KEY З, "+A+ "GOSUB /////////"жа 
180 PRINT#0" KEY 4, "+CHR$ (94, 4, 122 *"HIDTHS0:L IST" *CHR$ (13, 34) 

190 PRINT#0" KEY 5, "+СНКФ (34, 12) + "КОМ" +CHR$ (13) *"//////////" +A 


200 PRINT#0" KEY 
210 PRINT#0" KEY 
220 PRINT せ 9" KEY 
230 PRINT#0" КЕҮ 
240 PRINT#0" 
s34) 


"+A+"L IM. &HFEFF:LO. "*CHR$ (13, 34) 

"+A+"FOR I= TO"+CHRS<(29, 29, 29, 1) *"//"*&À 

"*A*"REPEAT ON"*CHR$ (5, 13) *"////" +A 

"*A* "LINE O - C 4CHR$ (29, 29, 29, 1) *"///" «à 

KEY18, "*CHR$ (34, 13, 30, 30, 30, 13) +"АР. -2" *CHR$X13) + "UE, "+CHR$ (13 


258 COLOR2:L INE (103, 15) - (103, 96) - (224,96) - (224, 7) - (215, 7) - (215, 15) - (103, 15) 


268 COLOR3 1! PR INT "アカ イ 77 2 ナカ э カキ カエ テ 22594." 
278 PRINT" ウ シロ / 3\7  / F° ウ ァ テ 2794. " 


275 COLORé:PRINT"CZ8CBOX / X ñ コン トロ ー ル キャ ラ ñ бу シテ 2 k 7UYA." 
280 COLORS:PRINT#HQ "コントロール キャ ラク クタ "+CHR$(28,32,2?, 32 30, 32, 31) +" ñ ESCH- э (Уң 


290 РКІМТЕВ"ЯУ2УҺ>7. "*CHRS$(CIS)*" P "+СНКФ C12) +" ñ RET. 


P CTRL+L 3 42," 


3800 COLORé:!PRINT:PRINT"NEMW BASIC ñ ESC+RET. キー 78727 ヒョウ シテ" キマ ス s ョ " 
310 COLOR4:PRINT#0"PRINT”+CHR$ (34, &H9À, 32, %Н97, 29,29,2%9,31,31,%Н99,32, &H?8, 34) +" 


2 322 2*07"56 / 7)?" ӘЛІП” メモ リー ノ セツ ヤク І ナリ マス 。" 


134 onwz 1984.5. 


COLOR2 IPRTINTIPR 1NT" オ フッ クラ F-1 キー + SPACE キー э Х9929%94. "j 

X=13:Y=2:COLOR 7 

LOCATE X, YiB=ASC く INKEY も て (1) › 

Bs27 THEN B=ASC (INKEY$ (12) :GOTO 448 
B=28 THEN X=X+1:D=1 

B=2? THEN X=X-1:D=1 

В=З@ ТНЕМ Y=Y-1:D=1 

B=31 THEN Y=Y+1:D=1 

-X=27 AND Y=1 THEN 440 

X<13 THEN X=13 

-X>27 THEN X=13:Y=Y+1 

Y<2 OR Ү211 THEN Y=2 

C=ASC (CHARACTERS (X, Y) ) 

LOCATE X,Y:IF D=1 THEN D=@:PRINT#0 CHR$(C):X=X-1 ELSE PRINT#0 CHR$(B) 

ХеЕХ+111Е Х>27 THEN X=13:Y=Y+1 IF Y»11 THEN Y=2 

GOTO 348 

FOR Ісі TO 10 

FOR J=1 TO 15 

В=А5С (CHARACTER$(12+J, 1+1)) 

IF B=47 THEN POKE ФНЕСЗ2%14ж1,/7-1:/-16:6070540 

POKE &HFC32*16XI*J,B 

IF J=15 THEN POKE &HFC32*16XI, 15 

NEXT:NEXT 

C=ASC (СНАКАСТЕК% (27, 15» 1 IF C<33 THEN C=59 

POKE &HFE24,C:POKE &HFE29?,C 

EJECT!CLS4:LOCATE 8,12:PRINT"SET BASIC CZ-8CB01 TAPE” 

IF CMT(1) =0 THEN 580 

CLS!LOCATE 2,4:РВІМТ "ТАРЕ 2% トマ ッ ク タラ МЕМ ТАРЕ э SET У" 

LOCATE 7,6:PRINT"SPACE KEY э 75775" 7х" 

LOCATE 2,10:PRINT"2-74 7° "25 479972 s 

LOCATE 2, 14:РКІМТ "МЕН ТАРЕ 5 イレ テ SPACE KEY э 4У929%94." 

LOCATE 2,18:PRINT"72^* ж COPY #**72" 

LOCATE 2,22:PRINT"12»25 RESET ^'^» 9» ty»522*94,." 

CALL &НЕЕ@@ 

DATA 21,69,FE, 01, 20, 80, CD, 41, 00, 24, 74, FE, ED, 4B, 72, FE, CD, 44, 00, 11, 42, OF, 21, 42 
,ҒС, 01, А0, 80, ED, B0, ЗЕ, B7, 32, А2, 01, ЗЕ, ЕЗ, 32, 6D, FE, ЗЕ, ЕЗ, 32, JA, PD, ЗЕ, 01, CD, 1B, 00, F 
E,20, 20, F7, 21, 60, FE, 01, 20, 00, CD, ЗВ, 80, 24, 74, FE, ED, 4B, 72, FE, CD, ЗЕ, 00, ЗЕ, 01, CD, EC, 
9D, C3, 2D, FE 


以上 は INPUT 文 を 使っ て いる た め , し か 
だ た が な いよ うに 思わ れ ま す 。 


MZ-2200 2000 808 
Maker "の 角田 裕一 ST, 入力 が 終わ り [CR] を 押す と , 始め 
SCREEN ker る 行 番号 を 聞い て きま す 。 行 番号 を 入力 す 


る と すべ て の 行 に 番号 が 付い て リス ト が 出 
MZ の シャ ー グ BASIC に は KEY0 の 機能 と 画面 が クリ ア さ る され,。 °1 T Teee "が 現 わ て きま す の で , 最後 の 行 ま で [CR] を 押し て 


が な いた だ め , スク リー ン エ ディ ッ ト に 頼っ 437. そこで, “1? の 上 まで を 使っ て , いっ て くだ さい 。80 字 モー ド の 画面 が 40 字 
て きま し た 。 こ の プロ グラ ム は , ゲー ム の 自由 に 画面 を 作っ て くだ きい 。 た だ し , 2 モー ド に 変わ れ ば めで た く 完 成 で す 。 
デモ な どの 画面 を 簡単 に 作る た め の プ ログ つ だ け ル ー ル が あり ます 。 最後 に , 本 プロ グラ ム を 入力 する 前 に , 
ラム で す 。 ° 書き 終わ る まで 決し て [CR] を 押さ ない 。 POKES23,5 : РОКЕ924,6(СЕ| 

RUN す る と, 使用 行 数 を 聞い て きま す 。 s 書き 終わ っ た ら , 何 か 書 いて ある 行 で を 入力 し て お く と, テン キー の [00」 が , [2 
1 23 の 間 で 指定 し て くだ さい 。 入 力 する CR] を 押す 。 回 に 変わ り , 打ち 込み 時 に 便利 で す 。 
リス ト 


58 PRINS YEE SCREEN Maker RN 50>24-с40 
INPUT "How many lines do you use? (1~23)";LI:LI=LI-i 


30 
40 IF (LI<O)+(LI>22) THEN 30 
50 PRINT"$":CURSOR O,LI*1:PRINT STRINGS$("*",40); 
80 INPUT"D";A$ 
70 DIM A$(LI) 
ВО FOR Y=O TO LI:FDR X=0 TO 39 
A$=CHARACTER$ (X,Y): IF ASC(A$)«30 THEN АФ-" " 
100 A$(Y)-A$(Y) +A$ENEXT X:USR($F14):NEXT Y 
.110 CONSOLE C80 
120 INPUT"START LINE : "jA:PRINT"é" 
130 FOR 1-0 TO LI 
140 PRINT Аҙ" PRINT "jCHR$(34) $5A$( D $CHRS(34) $ "s" 
150 А-А%10:МЕХТ:РКІМТ"РОКЕФ952, 156: CONSOLE C400"; :POKE$952,166:NEW 
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М2-80К C. 1200 ж 


PASCAL SP-4010HT73X-—-u* т 


| 
| 
| 


j 


PASCAL SP- 4010 の デー タ 入 力 用 に t, 
MZ-80K/C/1200 の 右側 の グラ フィ ッ ク キ ー 
を テン キー に 変更 し て み ま し だ た 。 だ だし, 
整数 型 の み で , 負 の 数 も 使え ます 。 

° 利用 法 

この 関数 を 使え ば ,PASCAL SP-4010 で 
作っ た プロ グラ ム の 中 で , 整数 型 変数 N を 
使っ て , 

N : TENKEY ; 

と 書い て や れ ば , N に テン キー を 使っ て , 
また 通常 の 入力 で も 整数 デ ゲー タ を 入力 で き 
ます 。 


еба; 


| 
| 
書い て な い キ ー は | 
受け つけ ませ ん | 


1200 で は 4 列 で す | 


80K/C で は 5 列 で す 


° プロ グラ ム の 説明 

この プロ グラ ム は 2 つの 関数 か ら な っ て 
УР 

KEYIN は キー1 文 字 を 読み と る も の で 、 
6 -1281H C, ハー ト の カー ソル を 点滅 き 
せ て キー を 読み と り ま す 。13 行 目 以下 は , 


受け 付け る キー を OR で つない で いま す 。 
24 行 目 は キー を 読ん だ と き , ハー ト が 出 て 
いる 場合 も ある の で 消し て いま す 。 

TENKEY は , KEYIN に よっ て 読み 込ん 
だ デー タ を も と に 数 値 を 作り ます 。 

や 」 (最上 段 右 か ら 4 列 目 ) を 入力 す 
る と 一 1 に な り ま す 。 

41 行 目 の CIN と いう の は , 現在 カー ソル 
の ある 文字 の コー ド (CIN コー ド , マニ ュ 
アル に つい て いる ) を 読み ます 。42 は マイ 
ナス 「 一 」 の ユー ド で す 。 

78 行 目 以降 は この 関数 テス ト の た め の メ 
4 zÇ, 無限 ルー プ (3>5 に な る こと は 
な いか ら ) に な っ て いま す 。 こ の 行 以 降 に 
あな た の メイ ンプ ログ ラム を 入力 し て いっ 
(772% 


キー の 割り 付け は 次 の と お り で す 。 


リス ト 


О.МАК N: INTEBER; 


1.Х-------- 


2.FUNCTION KEYIN: CHAR: 


S.VAR К: CHAR$ 


4. 


T: INTEGER; 


5. BEGIN 


6. 
7. 
в. 
9. 
10. 


24. 
25. 


T:=0; 
REPEAT 
IF T<4 THEN WRITE ("WÜ") 
ELSE WRITE(" gB"); 
T:=(T+1)MOD Bs 
Ks =KEY; 
UNTIL 
(K=” РОК (Ке |” )DR (K=” m’ ) OR 
(K=” ҒООКХ(К-” |”) OR (K=” 7" ) OR 
(Kz*] *) DR (K=” | * )OR(K=”L * ) DR (K=” р) DR 
(Kz* PJ” XCRX) ОК (K=° —” ) OR 
(K=” /* XKETUZ) OR (K=” 3” XKETUX) OR 
(ORD (K) =102 СКУ) OR (ORD (К) =96 ZDELX) OR 
(ORD (K)=20 767) DR (K=? A” ZDEL?7.) OR 
(K=" 1” ) OR (K=” 2” ) OR (K=” 3? ) OR 
(K=” 4” ) DR (K=” 4” ) OR (K=” 5”? ) DR 
(K2'6* ) OR (K=” 7? )OR (K=” 8” ) OR 
(k=°9° )OR(K=”O”) 5 
MRITE(" g"); 
KEYIN: =K; 


26. END; 


28. FUNCTION TENKEY: INTEGER; 
29.VAR К: CHAR; 


зо. 
31. 


N, IN: INTEGER; 
MINUS, KESSEKI : BOOLEAN; 


32. BEGIN 


33. 
34. 


35. 


34. 


NE CS 


зв. 
59. 


40. 
4. a 
42. 


аз. 


А44. _ 


136 


N: 20; MINUS: =FALSE; KESSEKI: -FALSE; 

К:-КЕҮІМ; 

WHILE (К< >” И” ) AND (ORD (K) < 3102) DD 

BEGIN 

IF (ORD (K) 2956) OR (ORD (K) 220) ОК (К=° R” ) THEN 
BEGIN 

N:zN DIV 10; 

WRITE ("E") $ 

IF ORD(CIN)=42 THEN MINUS: =FALSE 

MINUS: -FALSE; 


E ERA 


END 
ELSE IF К-”-”ТНЕМ 


Oh! MZ 1984.5. 


BEGIN 
MINUS: -TRUE; 
WRITE ("-"); 
END 
ELSE IF (Kz* /* ) ÜR (K=” 3” ) THEN 
BEGIN 
KESSEKI:-TRUE; 
WRITE("/")j 
END و‎ 
ELSE 
BEGIN 
CASE K OF 
A e a aa P s IN: =O; 
71',* P'tIN:=15 
^2','.w' t IN: =25 
e uds Е:ІМ:-3: 
4°, |^: IN: —45 
»m*,?995YNImSj 
"6" ,71^ * IN:-6; 
=T I i S INS97; 
?8',”"L”: IN: -B5 
297,” ГЕ :1ІМіж9; 
END; XCASEX 
WRITE(CIN*:1); 
М: ZNE10-*IN; 
END; 
:=KEYIN; 
END; AWHILE 
IF KESSEKI THEN N:--1; 
IF MINUS THEN М:--М; 
TENKEY : -N$ 


76.END; 
77。%%ーーーーーーーーーーーーーーーーーーーーーーーーーー РА 
78.BEGIN 


79. 
80. 
B1. 
82. 
83. 


86. 
87. 
вв. 


WRITE ("E"); 
REPEAT . 
N: =ТЕМКЕҮ; WRITELN() 5 
WRITELN("Nz",N:5); 
UNTIL 355; 


X866 YDS オキ マチ 3922-124 — 0 


MZ-80K C( 
パタ ー ン 認識 プロ グラ ム /—— 中 田 $ Q 


Hu-BASIC) 


コン ピュ ー タ に 。 


ン を 判断 きせ る プロ グラ ム を 作り まし た 。 


自分 の 入力 し た パタ ー えと 同じ な の で 一 応 成功 し まし た 。 誤 答 率 


が 高い と 思わ れる 方 は 改良 し て みて くだ きる 


使い 方 は , キーボード 上 の 複数 の KEY を い 。 


同時 に 押し ます 。 す る と , 
次 の よう な 判断 を し て くれ ます 。 
NONE 何 も な い 
DOT 点 で ある 
BAR 05550 


。 フ ログラム お よび 主 な 変数 
10--60 マシ ン 語 

70-160 押し た キー の 数 の 計算 
170—200 説明 文 

210-300 キー スキ ャ ン 


=> Z > I 


BOX 箱 の よう な 形 310--360 判別 

TRI 三角 の ょ うな 形 K$(255) 押し た キー の 図 

RING リン グ の よう な 形 K(255) 押し た キー の 数 

???? わか ら な い A 押し た キー の 2 の 列 の 数 


рм, これ だ け の プロ グラ ム で す 。MZ- B 
80K/C の キー 配列 が キー ボー ド マ ト リッ ク С 


リス ト 


10 
20 
50 
40 
50 
60 
70 
во 
90 


押し た キー の 1 の 列 の 数 
押し た キー の 0 の 列 の 数 


"ササ ササ サリ リウ ツ ササ サリ ササ ササ ササ ササ ササ ササ サリ ササ サ 
CLEAR &HCEFF 
FOR 2-0 TO 20:READ A$:POKE &HCFOO-*J,VAL("&£H"*4$):NEXT 
DATA 26.СҒ,2Е,ҒҒ,7Е.26.ЕО,2Е,00,77 
DATA 26,E0,2bE,01,7E, 26, CF, 2E.FF,77,C9 
7 VUUUUUVUUVUUVUUVUUVUUUUUUUUUVUUUUUUUUUU 
CLS:LOCATE17; 10: PRINT"WAIT" 
DIM K(255) ,K$(259) ,L$(1) : X255 
L$(O)-".E":L$(1)-"8E" 


100 FOR A=0 TO 1:FOR B-O TO 1 


110 


FOR C-O TO 1:FOR D-O TO 1 


120 FOR E-O TO 1:FOR F-O TO 1 

130 FOR G-O TO 1:FOR H=O TO 1 ° 
140 K$(X)=L$(H)+L#$(G)+L$(F)+L$(E)+L$(D)+L$(C)+L$(B)+L$(A) 
150 K(X) =A+B+C+D+C+D+E+F+6+H: Х-Х-1 


151 
160 


PRINT X+1;K(X+1)šK$(X+1) 
МЕХТН, GFE, DC, B, A 


170 CLS 


180 


LOCATE 17,5:PRINT"PATTERN ニラ シキ " 


190 LOCATE 17,8:РКІМТ"??х2/ KEY? 7757 277474" 


200 
210 


LOCATE 17,10:PRINT"7^/ PATTERN? アテ マス" 
A20: В=0:С=0: D=0: PRINT "I" ; 


211 Е=О:Р=0 


220 FOR I-O TO 9 STEP 2 
230 POKE, &HCFFF, I: CALL &HCFOO 
240 О=РЕЁК (&HCFFF) : P-K (0) 


241 H-Q 
250 PRINT КФ (0); " 


260 РОКЕ &HCFFF, 1+1: CALL ЫНСЕОО 
270 Q=PEEK (&HCFFF) : P=P+K (0) 


280 PRINT КФ (0) :Н; 0; 


290 А=А- (Р=2) :В=В- (Р=1) :С=С- (P20) :р=р+Р 
291 ЕзЕ-(Р-3):Ғ-Ғ-(Р-4) 


500 МЕХТ 
510 LOCATE 17,14 


320 IF С=О THEN РКІМТ "МОМЕ": GOTO 210 


330 IF D-1 THEN PRINT"DOT 


":GOTO 210 


340 IF А+В>5 OR (C-1 AND 0>5) THEN PRINT"BAR ":GOTO 210 
541 IF (B=1)+(ñ=1)+(E=1)+(F=1)<—-—1 THEN PRINT"TRI ":GOTO 210 
342 IF D>8 AND А<1 THEN PRINT "RINB":GDTO 210 
. 350 IF D>3 THEN PRINT"BOX ":GOTO 210 
0 PRINT"??7??":GDTO 210 


押し た キー の 数 の 合計 
押し た キー の 数 の 小計 
E001 番 地 の 値 


ik) 3 つ 以 上 の キー を 同時 


- に 押す と 。 押 きれ て いな 
、 い キー まで も 読み と る こ 
と が あり ます が 。 AE 

上 し か た あ り ま せん 。 
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РС-1Р51/РС-1500(4К HAM 必 要 ) 


E: ж 


は じ め に 


本 誌 82 年 11 月 号 に 掲載 し た PC-1211 用 ポ 
ケッ トメ モ を , PC-1251/1500 用 に 機能 アッ 
プ し まし た 。 胸 ポ ケッ ト に も 楽々 入る ボケ 
ッ ト コ ンピュータ を , あな た の 仕事 に 利用 
し て くだ さい 。 


PC-1251/1500 用 ボケ ッ ト メ モ の 特 敏 

本 プロ グラ ム は , デー タ 格 納 エ リア を 増 
XU, キー 部 に 1 メモ リ 分 (7 バイト ), F 
ー タ 部 に 3 メモリ 分 (21 バ イト ) の デー タ 
を 41 組 分 格納 する こと が 可能 で す 。 デ ー タ 
入力 時 の 操作 も , I/O バ ッ フ ァ に 79 バ イト 
DXFAHDH TAE, 1 回 の 入力 で KEY 部 お 
よび デー タ 部 の 入力 を 行ない ます 。 

また , スケ ジュ ー ラ 機能 を 追加 し , IP 
NPUT) で KEY に 日 付 ( MM/DD ) を 入力 
し て , 当日 日 付 の 入力 内 容 を 出力 し ます 。 
クリ ア す る と , 当日 日 付 以前 の 入力 内 容 を 
クリ ア し ます 。 こ の と き プ リン タ 出 力 の 指 
定 を する と, 消去 し た 内 容 を すべ て プリ ン 
ト ア ウト し ます 。 

そし て 次 に , デー タ の SAVE お よび LO 
AD 処理 を 正確 に 行なう むために , カセ モッ ト ・ 
イン タフ ェ イ ス を 追加 し まし た 。 本 サブ ル 
ー チ ン は , CE-125 プ リン タ の LP イ ンタ フ 
ェ イ ス と し て , PRINT 命 令 を LPRINT @ 
令 に 置き 換え て いま す 。 


操作 方 法 


PC-1500 用 は まず 最初 に , NEW & 4100 
と 必ず 行なっ て くだ さい 。PC- 
1500 で は 4K RAM CF-151 が 必要 で す 。 

プロ グラ ム を 正しく 入力 し た ら CLEAR 
t L, [DEF][S] に よっ て 起動 す 
5t, ?LP-OUT Y/N= ニ と 表示 が 出 ます 。 


138 onwz 1984.5. 


. 
& » 
43" م 


この と き 6 行 で エラ ー が 出る よう で し た ら 。, 
RUN で 起動 し て くだ さい 。 
CE-125 ま た は CE-150 の プリ ンタ が 接続 
し て ある 場合 は 、 Y を 入力 する と プリ ンタ 
に 出力 され ます 。 通常 は N を 入力 する か 
[ENTER] キー を 押し ます 。 次 に メニ ュー が 
表示 され ます 。 
F/IP/DL/TR/SC- 
2 度目 以降 の 起動 は [DEF|[S] で す 。 
A) IP (INPUT) 指定 
デー タ を 入力 する と き の コ マン ド で す 。 
[ENTER | キー だ け を 押す と メニ ュー に 戻り 
ます 。 1500 用 は [| | で 戻り ます 。 ま た ., 検索 
キー 名 だ け 入 力 し て も エラ ー と し て 扱わ れ , 
記憶 きれ ませ ん 。 検索 キー は , 6 文字 以上 , 
PC-1500 用 で は 15 文 字 以 上 は 無視 し ます 。 
デル ミ 交 は *:" bL, ANF АБАЛ 
可能 な だ け , 1/0 バッ ファ は 79 文 字 ま で OK 
Ст. 
жж 7 
入力 TOKYO : JAPAN. WORLD (ENTER) 
検索 キー 
B) F (FIND) 指定 
検索 キー を 入力 する こと で 特定 の デー タ 
を 探し 出し , 表示 し ます 。 
表示 


? 
入力 TOKYO 
処理 結果 JAPAN. WORLD 


テル ミタ 入 カ デー タ 内 容 


C) DL (DELETE) 指定 

記憶 きれ て いる デー タ の 一 部 を 削除 , 同 
ー の 検索 キ 一 名 の デー タ は すべ て 消 ぇ ます 。 
D) TR (TRACE) 指定 

デー タ を すべ て 表示 し て いき ます 。 
E) SC (SCHEDULE) 指定 

検索 キー を 月 / 日 と し て 入力 し て お き , ス 
ケ ジ ュ ー ル と し て 使い ます 。 当 日 の 日 付 の 
デー タ が ある 場合 は 内 容 を , な い 場 合 は メ 


ニュ ー を 表示 し ます 。 クリ ア 指 定 を し た 場 
合 は 当日 日 付 以 前 の デー タ は DELETE さ れ 
ます 。 


7 CLEAR Ү/М= _ 
Y 


? 
01/25 (ENTER) 1325 日 の 意味 で す 。 


カセ ッ ト ・ イ ンタ フェ イス の 起動 法 


[DEF][C] で 起動 きせ る と, 1)SAVE 2) 
LOAD- と 表示 され ます 。 デ ー タ の セー プ 
で は 1 を 押す と , RDY? МЕМ» CMT と 
表示 され , 録音 の 用 意 が で きた 6[ENTE_ 
R を 押し ます 。 次 に コメ ント , カセ ッ ト 番 
号 (0 or D, テー プ の 開始 カウ ント を 入力 
5L, デー タ の 出力 が 始ま り ま す 。 ЖТ 
する と プリ ンタ に 印字 る れ ま す 。 デ ー タ を 
ロー ド す る 場合 は [DEF |[C| Ob t, 2 を 
押し て くだ さい 。 


お わり に 


今回 は PC-1211 の 移植 版 の 「 ポ ケッ トメ 
Æj Z, さら に PC-1500 で も 使え る よう に 
し まし た 。 ア ル ゴ リ ズム は 多少 異な り ま す 
が , 同 等 の と ころ は 同じ 行 番 に し て あり ます 。 
PC-1251 で は , デー タ の 記憶 は 41 組 まで 
で す が , PC-1500 で は 16 字 以下 の デー タ な 
ら 100 組 まで 可能 で す 。 

今回 使っ た マシ ン 語 部 分 は , PRINT t L 
PRINT を 変換 きせ る も の で す 。PC-1250 に 
は ある この 命令 が , PC-1500 で は 見 当たり 
ませ ん の で , マシ ン 語 で 作り まし た 。 機 会 が 
あり まし た ら , PC-1500 で の マシ ン 語 の 使 
い 方 に つい て 説明 し た いと 思い ます 。 

と に か く , 今回 の ポケ ッ ト メ モ 。 な か な 
か 便利 で す 。 ア ドレ ス 帳 や スケ ジュ ー ル 表 
と し て 有効 に 使っ て て だ さい 。 


リス ト (PC-1251 用 ) 


SIREM *MEMO* V/R=2/3 
6:”5” IF I=0 LET Ізі: 
DIM B$(2)*80 
8:60SUB *LPIF* 
10:6070 198 
11:76"Ха0:Үс0:2з0:1-0 


1218EEP 1: INPUT *15SñV 


E 2)LORD «752% 
1311F 2s2"1* GOTO 28 


2 1S:PRINT "RDY? MEN< く CHT 


16:CLEAR : INPUT 270878 
`. 


17:1=@ 


18:LPRINT "LOAD OK COME 


NTz*$CS: LPRINT ** 
19:END 


20:PRINT "RDY? MEM» CNT 
22:BEEP 1: INPUT "СОМЕН 


Tz*$0$ 


‚ 23:BEEP 1: INPUT "C-MT 


Nüs*iI 


С 241BEEP 13 INPUT "START 


-COUNTER=";J 
26:Z$=* DATA 
1*DATA* 


 S8:BEEP 1: INPUT "END-C 


DUNTERz* M 


31:UPRINT 77: LPRINT ™™ 


3218g8* --—---* 
33:LPRINT X$32$3X$ 


34:LPRINT *COMENT-*:C$ 


35:Ү6:”27» STRS I:25- 
ETRE Je*-'« STR$ M 


リス ト (PC-1500 用 ) 


508 
6:"S"IF I=0LET H 
=200:DIH B$(1) 
X80, А8(М2:11: 


10:60Т0 138 

11: "C"X-8: Y-0:2-0 
1120: AIT 

12:ВЕЕР 1:INPUT " 
1)SRUE 221080 
ш";29 

T 28-"1"60Т0 


15:PRINT "RDY? МЕ 
м<‹сит" 

16: INPUT #"DATA"; 
A$ (¥2, C$ 

12:LPRINT "LOAD 0 
к" 

18:LPRINT "СОМЕМТ 
z"SCS$:LPRINT " 


19: END 

20:PRINT "RDY? ME 
n»»cnT" 

22:BEEP 1:INPUT " 
COMENT-";C$ 

23:BEEP 1:INPUT " 
С-МТ NO="j 1 

24:ВЕЕР 1:INPUT " 


STRRT-COUNTER= 


663 

, 

26:2$-" DATA “: 
PRINT #"DATA"; 
ñA$(*),C$ 

39: BEEP 1:1NPUT " 
END-COUNTER-"; 
E 

31:LPRINT "": 
LPRINT "" 

i AA a rAr TERCER MON ез 


33:LPRINT X$;2$;X 


$ 


34:LPRINT "COMENT 


Cê 
35:Y$="#"+STR$ 1: 


"t PRINT 


36:LPRINT ° C-MT= *;Y$ 
i" (31281 *5* 

37:LPRINT X$;X$;X$ 

38:LPRINT "° 

39:121: END 

100:D227 

185:1241:J24: REM 41-ENT 
RY 

110: 8D) 21:5 8(D*102J 

120:608UB *DIM":A(A*10-0 

130:"A*K$z"": BEEP 1: 
INPUT *F/IP/DL/TR/SC 
=*;2$ 

155:6070 2% 

250:7ІР"7а1:1з1: 50SUB " 
IKD” 

255:1F 1>A(D) ВЕЕР 5: 
PRINT "AREA NOTHING* 
+ GOTO "A" 


- 268:60SUB “DIN” 


265:IF A$(0) LET ізін: 
6070 255 

275:А$6(й)=К%:А%(А+1)=Е$: 
A$(A+2)=F$: A$(A+3)=6 
$ 

276:L= LEN B$(25 

2TT:1F しく =21 GOTO “ІР” 

278:8$(2)- MIDS (В%(2)»2 
25 

279:G0SUB 606 

280:1=1+1 

282:0070 255 

5900: "Е° GOSUB “ІК” 

303:J21:I21 

304:WAIT 1: PRINT K$" : 


M$=STR$ Je"-"4 
STR$ E 

36:LPRINT "C-MT=" 
PYS" ("JNS") 


32:LPRINT X$;X$;X 
$ 


38:LPRINT "" 
39: Iz 1: END 
138: "А"К$=""; ВЕЕР 
1: INPUT "Е/1Р/ 
DL^TR^SC-"; 2$ 
132:1F 2$-"F"OR Z$ 
z"IP"OR 2$-"DL 
"OR 2$-"TR"OR 
2$-"SC"GOTO Z$ 
134:60Т0 130 
250: "ІР"Я=0: GOSUB 
"IKD":IF B$(9) 
="! "GOTO "ñ" 
251: IF K$-B$(0) 
BEEP 1:PAUSE " 
ERR!":G60TO "IP 


255:1F А›МВЕЕР 5: 
PRINT "AREA NO 
THING":GOTO "А 

265:IF $〈A)LET ñ= 
&*1:GO0TO 255 

223: R$()=HID$ (K$ 
»1; 1454" :" 

224:ñ=ñ+1: IF АМ 
GOTO 255 

225:ñ$(ñ)=B$(0) 
226:L=LEN B$(0) 

222: IF L<=16LET ñ$ 
CA+1)="": GOTO 
ТІР" 

228:В%(0)-М109 (B$ 
(0), 17, L-16) 

282:GOTO 224 

300: "F"GOSUB "IKD" 
IF B$(0)="!" 
GOTO "а" 

303: n=9 

305:ІҒ АЖОЕ R$(R〉 
=" "GOTO "ди 


*t WAIT 
395:1F I>8çD) GOTO "ñ" 
3180:60SUB “DIM” 
315: IF А%(АУ<Ж% LET Ізі 
+1: 0070 305 
320:WRIT : GOSUB “РЕТ” 
322:IF LEN .В%40)-3‹21° 
WAIT 1: PRINT "* ` 
329:151+1: GOTO 305 
409: "DL" 60508 “IKD” 
405:7=1:1=1 
410:1F ТУА) GOTO 78” 
415:G0SUB "DIM" 
420:IF АФСА)<К$ LET 1=1 
+11 GOTO 410 
425:8<62-0 
450:151%1: GOTO 418 
4580: "TR" J=1:6$="" 
460:FOR Ізі TO ACD) 
465160508 "DIM" 
468:ІҒ AS(A)=G$ GOTO 475 
410:PAUSE ñ$<0);" 1," 
471:B$(0)=ñ$(ñ+1)+6$C0+2 
)+0$(6+3)> 


` 27214617 1: PRINT ASCA)I 
ips А 


473:PRINT * 
47418917 
475:МЕХТ I 
480:0070 "A" 
499:BEEP 1: PAUSE "ERR ! 


"3B$COD 


508:"SC'Z$2"N*": BEEP 1: 
INPUT “CLEAR? YZN =" 
325 


315: IF ñ%(ñ)jy<>K$+" 
: "LET 8-041: 

GOTO 305 . 

320:WAIT 20:PRINT 
A$C02:WAI1T 

321:A=A+1: IF ASCA) 
<>""AND RIGHTS 
CASCA), 2) く >" : 
"PRINT " ";ñ$ 
‹А›:60Т0 321 

322:MRIT 1:PRINT " 
" 


325:GO0TO 305 

400: "DL "GOSUB "IKD 
":lIF B$(CQos"!" 
GOTO "a" 

405:0-8 

418: IF АЖОВ А9 (6) 
=" "GOTO "ñ" 

415: IF R$(R) く >2K$+" 

"ШЕТ 82841: 

GOTO 410 

429: GOSUB 421:60T0 
419 

421: J=A: A=A+1 

422:1F ADMLET А$‹Ј 
)=""; RETURN 

423: IF RIGHTS (A$ 
82,2045" :"LET 
=A+1: GOTO 422 

424:FOR P=JTO М 

425:ñ8$%$(P)à=ñ$(P+ñ- J 
IF A$(P)="" 
RETURN 

426:NEXT P 

430: RETURN 

450: "TR" 

469:FOR ñ=0TO M 

468: IF AS(A)="" 
GOTO "A" 

429: IF RIGHTS (A$ 
A), 2)=" :"GOTO 
474 

422:MRIT 29:PRINT 
" — "3R$COO: 
GOTO 425 

424:MRIT 60:PRINT 
ASCA) 


5@1:ВЕЕР 1: INPUT "DATE? p IF N> LEN asco GOTO 


HM/DD =";U$ 
582:1F LEN U$ く >5 GOTO 49 


9 
503: IF Up AG Mrs 
99 e 


508:K$=U$ | 

509:ІҒ 2%<77” GOTO 35 
510:J=1:G$="*" 

515:F0R I=1 TO ACD) 
516:608UB “DIN” 


519:1Ғ ñ$(ñ)=G$ GOTO 530 


520:ІҒ 08$(ñ)<U$ WAIT 1: 
PRINT "4DEL»*$8$C60: 
WAIT 60: GOSUB “РЕТ” 
+АСА)=@ 

530:МЕХТ I 

$35:60T0 303 

548:6070 "А". 

680: "IKD" PAUSE "EU. 
PAUSE ""N/DDi* 

691:BEEP 1: INPUT ase 

692:50SUB *FECHY 

694: IF C=1 (ЕТ K*=B$(1) 


606:K$=B$(1):E$=B$(2):F$ 
= MIDS (В%(2),8»70:6 
$= MIDS (B$(2)»15:7) ` 


608: RETURN 
620: "PRT*B$CB)*" 
622:B$(0)=" 
A$(A+2)+A$ (4+3) 
624:BEEP 1: PRINT B$(0) 
638: RETURN : 
800: *FECH”" REM FECH 
802: Ç=0:N=1 


425:NEXT ñ 

480:60Т0 "А" 

499: ВЕЕР 1:PAUSE " 
ERR !" 

500: "SC"Z$="N"; 
ВЕЕР 1:INPUT " 
CLEAR? Y/N ="; 
2% 

501: BEEP 1: ІМРШТ " 
DATE? ММ/00 =" 
;U$ 

502:1F LEN U$<>5 
GOTO 499 

503:1F U$5"12732" 
GOTO 499 

508: K$=U$ 

589: IF Z$<>"Y"GOTO 
383 

515:FOR А=0Т0 М:0- 
а 


516: IF RIGHTS (A$( 
85,2505" :" 
GOTO 530 

519: IF A$(A)="" 
GOTO 530 

528: IF А$СА)<и$+" 
:"WAIT 28: 
PRINT "<DEL>"; 
А$СА›:МА1Т 48: 
GOSUB "PRT": 
GOSUB 421:6-0: 
GOTO 516 

530:МЕХТ А 

535: 6OTO 303 

690: "1KD"PRUSE "KE 
Ү:":РАШ$Е "ММ/ 
DD: " 

691: BEEP 1:B$( の 9)=" 
": INPUT B$(9): 
IF B$(8)="!" 
RETURN 

603:М-1:ІҒ B$¿(0)=" 
"GOTO 601 

604: IF МЕМ B$〈9〉 
LET K$-B$C0): 
GOTO 619 

606:2$-MID$ (B$C0) 
; М, 12 


実用 プロ グラ ム 


аманы 


ыы MIDS 4B$C0) 851) 
888:IF Z$<>":" LET N=N+1 
22% GOTO 884 
 818:C=C+1:L=N-1 
upra: MID$ qs» 
sL Š 1 
` 813sN=Nt1 っ 
814:L= LEN B$(0)-N+1 
815:B$(0)= MIDS (B$(9)5N 
Ë 1%) 
816:N=1: 6070 804 
820:1= LEN B$(Q)*1:C-C*1 
821:1F C>2 GOTO 824 
822:B$(C)= ir! (B$COD 51 
е? _ 
824: RETURN ipt: 
930:"LPIF" BEEP 1: INPUT 
..*9 LP-0UT Y/N=";2$ 
`831:1Р Z$="Y" PRINT = 


; . LPRINT 
` 832:1F p PRINT. = 


PRINT 
833:RETURN 


: 980: "DINA=ACD+ 44 Er 
c Ma RE d 


ic "NO 


608:1F 2842": "LET 
N=N+1: GOTO 604 - 


 610:L=N-1 . 


612:K$-nID$ (B$C0) 
41,12 

613:N=N+1 ` 

614:L-LEN B$CO)-N* 


ў 1 
615:В%(02-М109 (B$ 


<Ø), N, L) 

619: RETURN 

628: "PRT"IF а+1›М 
RETURN 

621:ҒОР J=A+1T0 М 

622: IF A$C(J)=" "OR 
RIGHTS (A$(J), 
2›=" : "RETURN 

624: BEEP 1:PRINT " 

“АС 

625: NEXT J 

638: RETURN 

830: "LPIF"BEEP 1:2 
$z"N":INPUT "? 

LP-QUT Y^7Nz"j 

2$ 

831: IF 2$-"Y"GOSUB 
"LP " 


832: IF 2$-"N"GOSUB 
"Р" 


833: RETURN 
900: "LP"Yz&B9: X-&9 
2:GOTO 920 
910: "Р"Х=&В9: Y=897 
920:РОКЕ %40Е0, %48 
› &44, %48, &40, & 
44, &FD, &5R, &5C 
930:РОКЕ %40Е8, &4A 
; &8B, 810, &B5, & 
ЕЙ, %02, &99, &0C 
940:РОКЕ %40Ғ0, &44 
, &B5, X, 502, 899 
; &12, &B5, Y 
959: POKE &49F8,&9E 
; &9E, &17, &ЗА 
962: CALL &49E9: 
RETURN 


「 ポ ケッ トメ モ 」 
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ОПЕ 


・Hu-BASIC の デモ ブロ グラ ム で 
中 間 色 が 出 て いる よう で す 。 も し あれ が 中 
間 色 な ら ば , その 出し 方 を 教え て くだ さい 。 
静岡 県 宮津 義之 
n... 広島 県 の 森下 由 
隆 さ ん , 神奈 川 県 の 佐藤 (さん , ІЗ 

ガ 何 人 の 人 ガ ら 寄せ られ て いま す 。 

S-BASIC, Ни-ВАЗІС, 25505 
ー ブ の 裏側 に も APPLICATION 207 
ラム が 入 つ て いま す 。 ご これ を 走ら せる と だ 
し か に 茶色 や ビン の 中 間 色 が 使わ れ て い 
ます 。 

中 間 色 を 出す に は ドッ ツ ト 単 位 に 色 を 交互 
に 変え て いけ ば よい の で す 。MZ-700 は グ 
ラフ ィ ッ ク ガ が 使え な い の で , ガ わ り に キャ 
5790 を 使い ます 。 この キャ ヤラ クタ 
は [GRAPH ] キー を 押し て | | を 押す と 
出 て きま す 。 中 間 色 を 出す 簡単 な 例 と し て , 
下 の リ スト を Hu-BASIC で 走ら せ て ぐだ 
さい 。 フ オォ アグ ラウ ンド ・ カ ラー( キ ヤラ クタ 
自体 に つぐ ご 色 ) と バッ フ プ ラウ ンド ・ カ ラ 
— (背景 に つく 色 ) を 0O から 7 の 範囲 で い 
ろ い ろ と 変え て み ま し よう 。 

COLOR2, 7 で は 茶色 (は だ 色 に 近い ), 
COLOR2.3 で ピン ク の よう に 見 えま す 。 

た だ し , 四角 形 の キヤ ラク 6 単位 で し か 
使え な いた だめ, 使用 範囲 は 限ら れ て きま す 。 


CLS:Y=1 (杉浦 勇一 ) 
LOCATE 0,0:COLOR 7.0 


EE S 


INPUT "FOR. COLOR (0-7)"iF 
INPUT "BACK COLOR (0-7)":B 
COLOR Е, В 
FOR- I=1 TD 5 

LOCATE X,Y+I 
PRINT "Жена" 
NEXT I 

100 X-X*5:1F X> 39 THEN X-0:Y-Y«5 

110 Y-Y MOD 20 

120 GOTO 20 


| ы X1 の HU- 
BASIC に は MOD と いう 命令 が あ 
る よう で す が ,。 BASIC の マニ ュ ア ル に は 


・ 問 ・ 箱 


載 つ て いま せん 。 ご の 命令 の 意味 を 教え て 
くだ さい 。 
Bl. X1 テ フク ニ カル マス ター117 ベ ペー ジ (Z 

ログ ラム 4 一 16) 

110 IF (1-1) MOD 8-0 ТНЕМ-- 

岡山 県 林 ж 

MOD に つい て は BASIC MANU 
^" の 11 ペ ー ジ に 少し だ け 説 明 が あ 
049. LÖL, 索引 に も 出 て いな い の で 
「 載 つて いな い 」 と 思わ れ だ の で し よう 。 

MOD と いう の は 命令 (コマ ンド 及び ス 
テー トメ ント ) の 部 類 で は な ぐ , 演算 に 
入り ます 。 つ まり の , 十 一 ※※ プ と 同じ 仲間 な 
の で す 。 そ の 意味 は 整数 剰 款 , つま り の, 78] 
つ だ と き の あ まり 」 を 求め る も の で す 。 

上 の 例 で は , |- 1 を 8 で 割 つ た と き の あ 
まり が 0O の と き ~ の 処理 を 行なう と いう 意 
味 で す 。 こ の MOD を 使う 人 は だ い へ ん 少 
な いよ うな の で , 実際 に どの よう に 使う か 
の 1 例 を あげ て お きま す 。 

前 の 質問 て 使っ た リスト を 見 て くだ さい 。 
行 30 と 40 色 で 色 の 値 を 0 か ら 7 と 指定 し て 
入力 を 要求 し て いま す 。 も し , 間違え て 8 
を 入れ だ 場合 50 行 で て エラー と な つて し まい 
ます 。 色 の 値 は / ま て し ガ な い ガ ら で す 。 

ここ で 50 行 を 

COLOR F MOD8, В MOD8 
と 変え だ と し ます 。「F MOD 8」 と い 
う の は 変数 を 8 で 割 つ を あま り で し たね 。 
ご これ な ら , 変数 に どん な 大 き な お 数 値 を 入 
れ て も 8 以上 に な る こと は あり ませ ん 。 
KIT, 7 を 入力 し た と き は /=8=0…7 で 
7 の まま で す が , 8 を 入力 し た と き は , 
8—8=1 …0 と , 0 に 戻さ ね て し まい ます 。 

同じ 理由 で 110 行 で も 使わ れ て いま す 。 
だ いて い の 人 は この よう な 場合 

10 1F Y>20 THEN Y=1 
と し ます が , MOD を 使っ た ほう が 短く て 


すみ ます 。 (杉浦 勇一 ) 
MZ-731 の ユー ザー で す 。 Oh! MZ 
E 11830 ТІРІ. 27., DE 
ツ ト オ ベレ ー テ ィング 」 で 早く ロー ディ ン 
グ で きる よう に な り , 便利 に 使 つ て いま す 。 
LDL, ヘッ ド の ちよ ょ つと し だ 汚れ で ロー 
ディ ング で き な く な り ま す 。 そ ご で , 2700 
ボー で は な く て 2000 ボ ー ぐ らい に 変更 で き 
な いで し よう ガ 。 広島 県 KERI 
要 は , 「 ボ ー レ ー ト の 変更 」 の 部 分 
IE... 少 
し 大 き な 値 に 変え れ ば 良い の で す 。 
Hu-BASIC の 場合 で 説明 し ます 。 ま ざ ヴ , 
1983 年 1 月 号 の 「CMT/OS」 を 入れ , 走ら 
せま す 。 そ し て , 11 月 号 42 ペ パー ジ の 説明 ど 
お り に Hu-BASIC を ロー ドレ , モニ タ の 
M コ マン ド で 次 の よう に 変更 し ます 。 
$221 $6—$3C $0Е $6F=$3C 
$200 $%-%!Е $20A $3-$1C 
$478 $4—$X 
ご れ で ボー レー ト は 2000 ボ ー に 近い 値 に 
な り ま す 。 だ だ し , Hu-BASIC で この ま 
まで は MZ -2000/2200 用 の プロ プラ ム を 読 
お こと は で きま せん 。 
2700 ボ ー の と きよ り も セー ブ ・ ロ ー ド の 
際 の 信頼 性 は 増す は ず で す 。 (大 西 A) 
MZ -2200 を 持つ て いま す 。 先 ご ろ シ 
ヤー プ ブ ガ ら 漢字 カラ ーBASIC と と 
も に 漢字 ROM ボ ー ド が 発売 され まし た が , 
ご の ボー ド は |・O 〇 デー タ 機 器 の 漢字 ROM 
ボー ド と 互換 性 は あり ます が ガ 。 
石川 県 安川 俊明 
MZ-2000 の 発売 当初 か ら | ・O デ ー 
Қала. 
-3055, 35,000 円 ) ガ 発売 され て いま し た が , 
今度 シャ ー プ が 発売 し た MZ-1R13 は この 
PIO-3055 に オプ ショ ン の ガ な 漢字 変換 
OMCPIO-3055-01, 7.,000 円 ) を 実装 し た 


も の で きす 。 基板 は 両 万 と も 同一 ご す が ガ , m 
ー ト アド レス 設定 の ディッ ブ スイ ツチ ガ が |・ 
〇 デー タ 機 器 製 で は あり まし だ が , シャ ー 
プ 製 は ダヤン パー 緑 に より の 固定 され ね て いま 
す 。 ご の ディ ッ プ スイ ッ ツチ の 省略 も あつ て 
Л, シャ ー プ 製 の ほう が 200 円 ほど 安い よう 
で す が , 基本 的 に は 同じ 物 と いえ ます 。 し 
だ が つて どちら を 使用 し て も , 漢字 カラ ー 
BASIC(MZ-2Z021) や HuBASIC Ver 
2.0 が 何ら 支障 な ぐ く 使え ます の で , 問題 は あ 
り ま せん 。 (松崎 洋 ) 

MZ -5521 を 持つ て いま す 。 近 く プ リ 
ШЕ шеша. シ 


ヤー プ の 広告 に よる と 5 種類 (MZ -1P02, 
1Р03, 1P04, 1P06, 1P07) あ り , ど れ に 
し よう ガ 迷 っ て いま す 。 選ぶ と き の ア ド バ 


イス を お 願い し ます 。 大 阪 府 吉田 一 義 
n パー ソナ ルコ ンピュータ は シス テム 
を 構築 し て は じ め て 本 来 の 性 能 を 発 
揮 し ます 。 本 体 だ け あ つて も CRT が な け 
れ ば 使え ませ ん し , ビジ ネス に 利用 する 場 
合 , 帳票 を 出力 する プリ ンタ が な けれ ば だ 
めで すね 。 は つが ぐ 優 れ だ パソ コン を 手 に 入 
れ だ の で す ガ ら , シス テム を 上 手 に 活用 す 
る に は 機種 選択 は 重要 で す 。 も ちろ ん 予算 
に も より ます が , 目的 に 合 つ た も の を 選ぶ 
べき で し よう 。 
MZ-5500 シ リー ズ 用 プリ ンタ は , ご 質問 
に も あり まし だ と お りら の , 現在 5 タイ ブ ガ 用 
意 さ れ て お ら り の, 
MZ-1P02 8X8 ド ッ ト , 808; 
MZ-1P03 24X24 ド ッ ト , 136 桁 , 漢字 
MZ-1P04 カラ ー イ ンク ジェ エット 


MZ-1P06 16X16 ド ッ ト , BOF, 漢字 

М2-1Р07 8X8 ド ッ ト , 806 
と な つて いま す 。 当然 の こと な が ら ド ッ ト 
が 多く な れ ば 繊細 な 文字 が 印字 で き , 単に 
性 能 の 面 で は MZ-1P03 ガベス ト ガ と 思い 
ます が 価格 が 54 万 円 と 高価 で , 誰 で も 入手 
で きる と いう も の で は あり ませ ん 。 

この 5 種 の うち , 新た に MZ-5500 シ リー 
ズ 用 と し て 発売 され た も の は MZ -1P06 の 
み で , MZ-1P02, -1P03 は MZ-3500 シ リ 
ー ズ , MZ-1P07 は MZ -2200 で すでに 発売 
され て い だ も の が ガ MZ-5500 シリ ー ズ で 使 
える と いつ だ こと に すぎ ませ ん 。 し た が ガ つ 
て イン マタ フェイス 自体 セン トロ ニク ス 準 拠 
の パラ レル の プリ ンタ で あれ ば ぱ , エプソン 
の FP-80 や 日 本 電気 の PO-PR201 な ども 
使え る の で す (だ だ レ し ケー ブル は , シャ ヤー 
プ 純 正 の MZ-1C32 を 使い ます )。 

シャ ー プ 5 種 の 純正 プリ ンタ に 限 つて 考 
えて み ま す と , 〇 P/M-86 な ど 〇 OS 上 で は 
一 席 す べ て サポ ー ト され て いま す 。 し が し, 
MZ-1P02 や 1P07 で は 漢字 を 含ん だ リス 
ト 出 力 び で きま せん し , MZ-1P04 の カラ 
ー ハ ー ド コピ ー も 漢字 〇 P/M-86 で し ガサ 
ポー ト さ れ て いま せん 。 ま だ た キャ ラク タフ 
オォ ント も 一 部 異な り ま す の で , 仮に アル フ 
アベ ッ ト の 反転 文字 な ど MZ-5500 シ リー 
ズ 特 有 の 文字 を 含ん だ リス ト を プリ ント ア 
ウト し だ 際 い わ め る 化け 字 に な つて し まい , 
若干 の 不都合 ガ 生 じ る の で す 。 ご これ は 他社 
の セン トロ ニク ス | / ド の プリ ンタ に 関し 
て も 同様 で す 。 だ だ し , ダウ ン ロ ー ド が で 
きる 機種 は この 限り で は あり ませ ん 。 

量 本 的 な 件 は 以上 の と お り で す 。 さ て , 
けつ こう 見 落し が ちな こと で す が ガ , 市 販 の 
パッ ケー ジ ソ フ ト を 使用 する 場合 に その ソ 
フト が どの プリ ンタ を サポ ー ト (使用 で き 
2262) し て いる か も 考え て お か な けれ 
ば な り ま せん 。. 単なる 表 集計 形式 の デー タ 
ベー ス や 簡易 言語 で あれ ば 特に 問題 ガ 生 じ 
る こと も な い の で す が , 日 本 語 処理 つま り 
日 本 語 ワ ー ド ダ ロ セ ッ サ と も な り ま すこ 事 
態 は 極め て 深刻 で す 。8 ピ ン の プリ ンタ を 
使用 し て の ワー プロ は 2 パス 印字 (千鳥 で 1 
パス 印字 の あと 1/216 イ ンチ ずら し て さら 


に その 上 に 印字 する ) 方 式 が ち つ と も よ ぐ 
EON, 16 ピ ン 24 ピ ン で は 1 パス で 印字 し 
て いま す 。 い ずれ も キヤ ラク タコ ー ド を プ 
リン タ に 送り それ を 印字 する 方 式 と は 異な 
0, ビッ トイ メー ジ や ベー バー フィ ー ド 等 
プ ブリ ンタ を 細か ぐ 制 御 し なぐ て は な のり ませ 
ん の て , 原則 と し て 指定 外 プ リン タ は 使用 
で き な い の で す 。 

も し , 吉田 さん ガワ ー プ ロ 利 用 を 主 目的 
と し て プリ ンタ を 選ば れる の で し た ら , M 
Z-1P03 ガ MZ-1P06 を お 推 め し ます 。M 
Z-1P03 は 24 ピ ンプ リン タ で 漢字 を 出力 し 
た 場合 明 朝 体 に 近い 高 品質 の 出力 ガ 得 られ 
ます 。MZ-1P06 は 16 ピ ビン の だ めど ちら か 
と いえ ば ゴシック フク 体 に 近い 印字 で す が 実 用 
に は 十分 で し よう 。 な お 用 紙 は 10 イ ンチ 幅 , 
つま り 単 票 に し て A 4 サイ ズ 縦 まで が 限界 
で す (MZ-1P03 は 16 イ ンチ で 9)。 

シヤ ー プ は あま り 周 辺 機器 の 広告 を 出し 
て いな いよ うな の で , 仕様 等 細 が ぐ チ エッ ツ 
ク ガ で きま せん が , 同じ 純正 と は いつ て も 
MZ-5500 シ リー ズ 用 で 市 販 さ れ だ も の は 
今 の と ころ MZ-1P06 だ け で すら ワ ー プ 
口 を あま り の 考え て いな い 場 合 で も この プリ 
ンタ を 選ば れ だ 方 が 後々 無難 か と 思い ます 。 
な お 洗 種 プリ ンタ の 詳し い 仕 様 は メー カー 
に 問い 合わ せ て くだ さい 。 (BRS) 


質問 に お 答え し ます 
日 ご ろ 疑問 に 思っ つて いる こと , どん な こ 
と で も 結構 で す 。 ど ん どん お 便り くだ さい 。 
難問 , 奇 問 , 編集 部 が 総力 を あげ て お 答え 
いた し ます 。 た だ し , お 寄せ いた だ いて い 
る も の の 中 に は , マニ ュ ア ル を 読め ば すぐ 
に 解答 が 得 ら れる よう な も の も 多々 あり ま 
F. RER, マニ ュ ア ル は 熱 読 し て お きま 
し ょ う 。 質問 は な る べく 具体 的 に , 機種 名 , 
シス テム 構成 , 必要 な ら 図 も 入れ て こと 細 
か に 書い て くだ さい 。 ま た , 返信 用 切手 同 
封 の 質問 を よく 受け ます が , 原則 と し て , 
質問 に は 本 誌上 で お 答え する こと に な っ て 
いま す の で ご 了承 くだ さい 。 な お , 質問 の 
内 容 に つい て 直接 問い 合わ せる こと も あり 
ます の で , 電話 番号 も 明記 し て くだ さい ね 。 
宛先 : 〒102 東京 都 千代 田 区 四 番 町 2 一 1 
(株 ) 日 本 ソフ トバ ンク 
出版 部 「Oh !MZ 質 問 箱 」 係 


INFORMATION 


マル チ ウ ィ ン ド ウ ・ マ ウス て 簡単 操作 


' 
“ЕУ A 
УТ 
ИИ", 
情報 コー ナー 


MZ-5500 に 話題 の 統合 化 ソ フト "TODAY" 登 場 ク 


シャ ー プ は , MZ-5500 の 統合 化 ツ フト で : の 実行 が 可能 で す 。 
ある “TODAY” を 発売 し まし た 。 〈TODAY の 特長 


TODAY は , MZ-5500 の 特長 で ある マル 
チ ウ ィ ン ド ウ 。 マ ウツ ウス, ピッ トマ ッ プ ディ 
スプ レイ な どの 機能 を フル に 引き 出す ソフ 


КС, MZ-TOOL (統合 化 の た め の 管理 プ : 
ログ ラム ) を 核 と し て , その 上 に MZ-CAL : 
C( 表 処理 計算 用 )、 MZ-GRAPH( グ ラフ 処 .: 


HEH) を 構成 し , デー タ の 一 元 化 を 可能 に 
し て いま す 。 

この TODAY に より , あたかも 頭 の 中 に 
いく つか の 局面 を 描い て 作業 を 進め る と い 


5 人 間 の 基本 的 な 思考 プロ モス に 近い 形 で | 


: 1) マ ル チ ウ ィ ン ド ツ 機 能 に より , 複数 の ア 


プリ ケー ショ ン の 実行 を 任意 に 切り 換え 
な が ら , CRT 上 に 自由 な レイ アウ ト で 複 
数 の 作業 を 同時 に 表示 で きる 。 

2) マ ウス に よる 操作 お ょ び , 漢字 を 使用 し 
た ガイ ダン ス し と 豊富 な ヘル プ メ ッ セ ー ジ 
に よる 簡単 な 操作 が 可能 。 


: 3) 各 アプ リケーション で 扱う デー タ を 共通 : 
WES 複数 の アプ リケーション 内 で の 利 : 


用 が 可能 。 


4) 他 の アプ リケーション 上 デー タ 交 換 可能 。 : 


ポケ ッ ト コ ンピュータ 


PC-1260 プ PC-1261 を 新 発 売 


シャ ー プ で は , BASIC を 知ら な く て も 買 
っ た その 日 か ら 使い こなせ る ビジ ネス シミ 


ュ レ ーション ソフ ト を 搭載 し た 手帳 サイ ズ : 
の ポケ ッ ト コ ンピュータ PC-1260 ン PC-12 : 


61 を 新 発 売 し ます 。 ま た , 本 体 と デザ イン 


を 統一 し た プリ ンタ と マイ クロ カセ ッ ト 一 | 
体 化 の 周辺 機器 CE-125S も 同時 発売 + +, : 


〈PC-1260/1261 の 特長 〉 


1) 計算 式 を その まま の 形 で 入力 で き る ビジ | 
: 6)PC-1250 の BASIC を ペース に し て ., 一 段 


ネス シミ ュ レ ーション を 搭載 。 

2) 手 帳 サ イズ で 24 桁 X 2 RER 

3) プ ログ ラム 作成 に 便利 な ヘル プ (HELP) 
機能 を 採用 。 

4) カ タカ ナ 表 示 機 能 に より , わか りや すい 
実用 的 な ゲロ グラ ム が 可能 。 


5) 大 き な メ モリ 容量 。RAM4.4K バ イト (PC- : 


1260), 10.4K^* 4 К (PC-1261) 


と レベ ル ア ッ プ し た 高度 な BASIC。 ま た 
パス ワー ド (暗証 番号 ) 機能 付き 。 


7) 操 作 性 を 配慮 し た 使い 易い 設計 。 ま た , 


ラス ト ア ン サ ー 機 能 に より , 直前 に 行なっ 
っ た 計算 の 結果 を 効果 的 に 使用 で きる 。 
価格 は 。 PC-1260 が 29 ,800 円 。 PC-1261 


: が 39,800 円 。 CE-125S が 36,800 円 。 


ты 
кз 


ж 
Ww 


э 


: 5) 辞 書 ROM (MZ-1R14) の 使用 で ワー プロ 


並 の 漢字 入力 が 可能 。 


| 6) ハ ー ド コピ ー 機 能 。 
: 7) 今 後 , こ の MZ-TO0L 上 で 広汎 な アプ リ 


ケー ショ ン ソ フト ウェ ア が 展開 。 


: 8)TOO0L 上 の アプ リケーション と し て 今回 


MZ-CALC と MZ-GRAPH を 統合 化 。 
MZ-2Z014 50 3 ЖН 68,000 円 


乳牛 の 健康 に も MZIY 
山形 県 に ある 大 蔵 ホ ルス タイ ン 同 志 会 
で は , 乳牛 の 健康 と 繁殖 の た め に MZ-20 
00 を 導入 し , 合理 的 な 飼料 計算 を 行なっ 
て いま す 。 乳牛 の 能力 は 乳 量 と 繁殖 で , 
その バラ ンス が 大 切 で す 。 酷 農家 に と っ 
て , 体重 や 体質 に 応じ て 適切 な 飼料 を 与 
える こと が 重要 で す が , この 計算 を 電卓 
で する と 一 頭 で 30 分 以上 も か か り ま す 。 
同 会 で は MZ を 利用 し て 計算 時 間 を 2 — 
3 分 に 短縮 , さら に 6 ヶ月 間 の 平均 飼料 
も 約 30 万 円 削減 出来 た と の こと で す 。 
使用 し た ソフ ト は , 同 山 形 県 天童 市 の 
酷 農 家 が 開発 し た も の で , 土地 に 合わ せ 
て アレ ンジ し て いる そう で す 。 〇 ① 飼 料 計 
算 の 他 に ② 乳 量 推定 も あり , 日 本 マイ コ 
ン セ ンタ ー 山 形 に て 取り 扱っ て いま す 。 
飼料 計算 シス テム MZ-2200/2000/80 
B-T-30,000 円 日 本 マイ コン セン ター 山 
形 110236— 41— 0223 


E 新星 堂 カル チェ 5 
黒田 書店 

有隣堂 ルミ ネ 店 
西武 ブッ クセ ンタ ーIOF 
精 文 館 書 店 
オー ム 社 書店 

RA ERE 

ABS PIN 

芳 林 堂 書 店 パル コ 5F 
平安 堂 飯 田 店 

岩渕 書店 

有隣堂 厚木 店 


0471(64)8551 
0492(25)3138 
045(453)0811 
0474(25)0111 
0532(54)2345 
075(221)0280 
06 (353) 2413 
0466(26) 1411 
0474(78)3737 
0265(24)4545 
0482(52)2190 
0462(23)4111 


三省 堂 神田 本 店 5F 
書泉 ブッ クマ ー ト BI 
八重 洲 ブ ッ ク セ ンタ ー ЗЕ 
東急 ハン ズ 寿 楽 油 7F 
紀伊 国屋 書店 本 店 


03 (233) 3312 
03 (294) 0011 
03 (281) 1811 
03 (464) 4604 
03 (354) 0131 
03 (200) 9185 
03 (981) 0111 
0424(87)2222 
0427(28)2782 


未来 堂 書店 

西武 百貨 店 マイ コン 売場 9F 
真光 書店 

東急 ハン ズ 寿 楽 洞 


川又 書店 駅 前 店 0292(31)0102 
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シャ ー プ 


小型 ・ 高 性 能 設計 カラ ー デ ィ ス プレ イ 用 


フラ イ バ ッ クト ラン ス を 開発 ・ 発 売 


シャ ー プ で は , 小型 ・ 高 性 能 設計 の カラ 
ー デ ィ ス プレ イ 用 フラ イ バ ッ クト ラン ス , 
<F0008> を 開発 し , 新 発 売 し ます 。 


こ 数 年 CRT デ ィ ス プレ イ 市 場 は 活況 を | 


ніс», 特に カラ ーCRT デ ィ ス プレ イ 


は 著しい 成長 を 続け て いま す 。 さ きら 6 に ,0A £ 
ニュ ー メ ディ ア の 進展 に 伴い CRT デ ィ ス プ : 


レイ は 高 品位 化 の 傾向 に あり , 搭載 され る 


フラ イ バ ッ クト ラン ス に 対し , 高 性 化 の 要 : 


求 が 強まっ て いま す 。 
この た だ たび 発売 する フラ イ バ ッ クト ラン ス 


: プロ ー ド 方 式 を 採用 し , 高圧 変動 率 の 低減 : 
: 第 2 回 月 間 特 別 党 
: INK 


<F0008> は こう し た 市 場 の 要望 に お 応え l お よび フォ ー カ ス 電 圧 の 無 変動 を 実現 し た 
する も の で , 省 ス ペー ス 指 向 に 徹し た 小型 : 高 性 能 ・ 高 信頼 度 設計 に な っ て いま す 。 
設計 に 加え , 高圧 コン デン サ を 内 蔵 , トッ 4 月 1 日 発売 4,700 円 
バ ソ コン サン デー 第 5 期 ス ター ト 

: 2) パ ソコ ン 生 活 最 新 情報 


去る 2 月 に 通算 100 回 を 迎え た パソ コン i 


情報 番組 「 パ ソコ ュ ン サン デー」 は , 4 月 よ 
り 第 5 期 が スタ ー ト し ます 。 


第 5 期 は 。 Dr. パソ コン 宮永 先生 を 講師 : 


に , 司会 は 下 条 アト ム と 坂上 味 和 が 担当 。 


MZ-5500 を 使っ た BASIC 講 座 を は じ め , 女 : 


子 大 生 の パソ コン レポ ー ト , 
ト の 紹介 な ど , 


2 ジコ ンジ ツジ 


テレ ビ 大 阪 ・ テ レビ 東京 ・ テ レビ 愛知 な 
ど 全 国 21 局 に て 4 H 1 日 より 放映 開始 。 
毎週 日 曜日 9 : 30~10 : 00 

< 番組 内 容 〉 
1) パ ッ ュ コン BASIC 講 座 


今 まで の シリ ー ズ 以上 に パ : 
ツ ュ コン 情報 色 の 強い 番組 作り し て いき ます 。 


: 3) 信 週 の BEST パ ッ コ ン ッ フト 


4)>€ = 34 =: S> 


: 5) パ ソコ ュ ン ワン ポイ ント クエ スチ ョ ン 
: 6) パ ソコ ング ラフ ィ ク ス 


< テキ スト > 
「 パ パ ツ コ ン サ ン デ ー 第 5 期 テ キス ト 」 
新紀元 社 刊 


: YDK 


980 円 : 


春の 入学 ・ 就 職 

お 祝 セ ー ル 

マイ コン ショ ッ プ グ 「YDK シ ステ ムセン 
ター」 で は , 3 月 20 日 か 6 4 月 30 日 まで , 


| | 入学 ・ 就 職 お 祝い セー ル を 実施 中 で す 。 


期間 中 サプライ 品 , MSX パ ソコン, その 


b: 他 パ ツ ソコン を シス テム で お 買い 上 げ の 方 に 
: YW ディ スケ ッ ト ケ ー ス фаи 2 
: ンク фаи ШЕ, 
i わく わく プレ ゼン ト を 差 上 げ ま す 。 


も ら っ て うれ し い 


(新宿 NS ビル 1 F 容 03-342-2441 ) 


「 イ ンタ プリ タバ パス カル の 拡張 」 
に 決定 


Oh / MZ 月 間 特 別 賞 , 2 月 末日 締め 切り 


: 分 は ,「 イ ンタ プリ タパス カル の 拡張 」 の 工 
: 藤 恵 氏 に 決定 し まし た 。BASIC の 次 の 言語 


と し て は 最適 し いわ れる PASCAL で す が , 


: 残念 な が ら DISK 版 は 発売 きれ て いま せん 
: で し た 。DISK を 所 有る され て いる 方 々 に は , 
: PASCAL が より 身近 か に な っ た こと と 思わ 
: れ ま す 。 工 藤 さ ん に は , 


"uS; mb, 


: ニーWALKMAN (WM-20) を お 送り いた し 
ます 。 


% 
СЕУЛ ере 


マイ クロ コン ピュ ー タ ショ ウ (日 本 電 
子 工業 振興 協会 主催 ) が , 今年 も 来 た る 
5 月 23 日 ( 水 ) 一 26 日 ( 土 ) の 4 日間 , 東京 
流通 セン ター 大 展示 場 (平和 島 ) に て 開 
催さ れる 。 
マイ コン ショ ウ は , マイ コン ファ ン に 
と っ て 最大 の イベ ント で , 昨年 は 114 社 


が 吉 。 な ん と 0 万 人 も の 的 を 動員 し 
た 。 今年 も すでに 114 社 の 参加 が 決定 し 
て お り , 各社 と も , それ ぞ れ に 趣向 を こ 
らし た 演出 で , マイ コン の 新しい 可能 性 
を 見 せ て くれ る に 違い な い 。 また, 例年 

同 シ ョ ウ に あわ せ て 新 製品 を 発表 する メ 

ー カ ー も 多い の で 見 逃す こと が で き な い 。 

期待 の シャ ー プ の プー ス は , 第 | 会 場 に 

ある 。 愛 付か ら 入る と 右手 奥 の | 一 14 な 

の で 迷わ ず 導 存じ ま よう 。。 — 

OR 2 会 場 2 一 42 に は 日 本 ソフ トバ ン 
ク の ブー ス も あり , 出展 に そなえ て 
近代 中 で す 。 ぜ ひ 立 ち 寄っ て 見 て く 
だ さい 。 
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スタ ー ラ イト ・ 
アド ベン チャ ー 1 , П 


A. X18 
B. MZ-2200/2000 用 各 10 名 


PE ТУК H 


画面 ひと つの テキ スト アド で 
ンチ ャ ー 型 の PARTI と きれ い 
な グラ フィ ッ ク の PARTII を 2 
本 セッ ト で プレ ゼン ト し ます 。 


タイ ム 
シー クレ ッ ト 


АКИН アド ベン チャ ー は コマ ンド 入力 
B.MZ-80K/C 用 410% が 面倒 だ. と いう 方 も 短縮 入力 
C.MZ-700 用 


で ラク ラク 。 し か し 。 謎 は 難し 
いで す よ 。 人 各 機種 PartI、3,500 
円 PartII, 3.800 円 


誌 3 月 号 で も 掲 
RL, 好評 を 得 て い 
る アド ベン チャ ー ゲ 
ー ム 「 タ イム シー ク 
vy bj С, ХІН, 
MZ-80K/C 用 が で き MZ-700 用 
cr. SPEM | 10% 
ジ は MZ ザー の み の 楽 し み 独 ғас ADVENTURE GAN 
占 と 嘆い て いた キミ , 
応募 し ょ う よ 。 


AUTOCRACY 


рің の パッ ケー 


各 機種 3.300 円 


アッ プル 風 本 属 的 アド ベン チ 
ャ ー ゲ ー ム と 銘 打 つ , 画面 数 120 
枚 の 超大 作 で す 。 オ ー ル 英語 の 
ゲー ム で すか ら , 英語 の 勉強 に 
も 役立つ か も …… 。 今 号 の 「AD- 
VENTURE, アド ベン チャ ー」 
に 紹介 が あり ます 。 3,800 円 


不思議 の 国 の アワ アリス 


MZ-2200/2000/80B 用 10 名 


今 号 で アド ペン チャ ー ゲ ー ム 作り の テク ニ 
ッ ク を 公開 し て くれ た マイ クロ キャ ビン より , 
テキ スト と な っ た 「 不 思 議 の 国 の アリ ス 」 を 
HL саз, ЖЕЛ ЕШУА 
が ら 不 思 議 の 国 へ どう ぞ 。 3,500] 


COSMIC 
SOFT シ ー ル 


2 セッ ト を 50 名 


「 デ ジタル ペイ ンタ ー」「 ア ニ メ デ ィ タ ー」 な どの お 絵 描 
き ツ ー ル を 開発 し て いる (株 ) ダ イツ ー よ り , か わい い 象 
の キャ ラク タ の COSMIC SOFT シ ー ル を プレ ゼン ト し 
て いた だ きま し だ た 。 ア ンチ ッ ク な 愛 囲 気 の シ ー ル で す 。 


プレ ゼン ト の 応募 方 法 3 月 号 プ レ ゼ ント 当選 者 発表 
q. A жы £ аху (茨城 県 ) 飯 村 は る み (愛知 県 ) EAE (奈良 県 ) 中 西 英樹 ( 広 鳥 県) 大野 保則 (大 阪 府 ) 阿 部 覧 一 ⑧ (東京 都 ) 橋 岡 
と じ 込 み の ア ン ケ ト は が き の 正和 (石川 県 ) 川 畑 健 (兵庫 県 ) 村 山幸 広 (CEFR) FLEET (東京 都 ) 浜 田 聴 ② (АЙЫН) KHE (福島 県 氏家 洋一 
該当 項目 を すべ て こ 記 入 の う ぇ 。 (ARIDE GWOSE (福島 県) 西山 典 考 (石川 県) 井上 直也 (北海道) 金子 洋一 (滋賀 県) 本 見 之 男 (埼玉 
1 県 ) 吉 本 志乃 武 (東京 都 ) 山 外 健志 OD (埼玉 県) 小笠 原 茂 (京都 府 平尾 健二 (奈良 県) 大 食 享 (神奈 川 県) 毛利 順 (埼玉 
希望 の プレ ゼン ト 番 号 を は が き 右 | wasu © сн) ое (神奈 川上 ЛАНД EDAEN (埼玉 県 清水 美幸 (ШЕМЕН © (大 阪 


上 の スペ ー ス に ひと っ 記入 し て お | ння (東京 都 ) 斉 藤 康 一 (長野 県) 中 島 寿行 (WORE (東京 都 ) 牛 山 正 人 (埼玉 県 ) 中 田 極 (AWE) FEBI 
2-7: 2 ; 史 (広島 県 ) 渡 辺 妨 (静岡 県 石塚 昌一 (兵庫 県 ) 足 立正 之 (WAO (ШИ) НЕ (兵庫 県 ) ЖНЖ 
申し 込み くだ さい 。 締め 切り は 5 (静岡 県 ) 高 森 功 (大 阪 府 ) 岡 田 信行 (大 阪 府 ) 片 田 稔 (千葉 県 ) 岡 部 健司 (宮城 県 岸波 徹 (東京 都 ) 内 山 保 栄 (東京 都 ) 黒 瀬 

15 日 の 到着 分 直樹 (愛知 県 ) 松 橋 光 秀 (群馬 県 ) 許 山 雅彦 (大 阪 府 ) 南 出 昌 登 (広島 県 ) 小 田原 育 也 (愛知 県 ) 伊 藤 基文 © (山梨 県 ) 川 口 
пн 522242 P$ ЕТЕПТІТЕТГІЛІ 
| 選 発 表 ほ 7 月 号 で 行ない ます 。 | 以上 の 方 々 が 当選 る れ ま し た 。 お めで と う ご ざ いま す 。 
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TEST 4 で は , 最近 発表 され だ SOFT で , 読者 の 要望 の 高い も 
の の 中 か ら , 評価 プルー プ が より すぐ つて 対象 と し まし た 。 


トワ ー ド 8 
ー 8 方 向 ス クロ ー ル ゲー ム 
使用 機種 : X | 
必要 な 機器 :GRAM 
E Uer RAT 
価格 : 3,600 円 
| 発売 元 : エニ ックス 
(00 803-366-4251 


ゲー ムセン ター に 「 ゼ ビ ウ ス 」 が 出 は じ め だ た ころ , 友人 に 「 お も し 
ろ い か ら や っ て みな 」 と いわ れ て や っ て みる と , これ が ほん と うに お も 
し ろ い の で す 。 こ ん な 感じ の ゲー ム を パソ コン で 実現 で きた らき っ と う 
ける だ ろう な , 
ー フ ォ ー ス 」 と し て たい へ ん な 人 気 を よん で いま す 。 

知名 度 は いま ひと つの よう で す が , この 「 ト ワー ド 8 」 も ゼビウス に 
ょ 〈 く 似 た ゲー ム の ひと つ な の で す 。 

スピ ー ド の 点 で は 「 サ ンダ ー フ ォ ー ス 」 よ り 劣 り ま す が (サン ダー フ 
ォ ー ス が 速 す ぎる ? ), 8 方向 スク ロー ル に な っ て いて 結構 よく で き て い 
ます 。 攻撃 を 受け て も すぐ に こち ら が や られ る わけ で は な 〈 く , ダメ ー ジ 
が 100% に な る まで ゲー ム を 続け られ ます 。 で すか ら 初 心 者 で も ある 程 
度 の 点 が と れる の で す 。「 サ ンダ ー フ ォ ー ス 」 で は 難し いと いう 方 に 向 
いて いる と 思い ます 。 ジョイスティック も 使え ます 。 ス ティ ッ ク の は ほう 
が や りや すい よう で す 。 (Y.S.) 


%9%9Я% irt 00... 
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ДААА Б А ДШ 
VOY “іні: vvv 
VYY 物語 性 YY 
%999%9 HE үү 
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ょ 考え て いた の で す 。 それ が 今 「 ア ルフ ォ ス 」, 「 サ ンダ 


e @ @ 今 月 の MENU@@@ 

PART 1 
トワ ー ド 8 
バッ クマ ン 

スベ ー ス ・ フ ルー ザー 

ロス ワー ド 英 単語 
PART 2 
B ir iiem 
PART 3 
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1. 操作 性 : 操作 手順 . キー 操作 な と ° | 
2 画面 処理 ・ グ ラフ ィ ッ ク 効 果 , 見 や すさ , メッ セー ジ 処 理 . pm ど 。 
3 評価 段階 

0999999; жиз _ 

vvevev よく で き て いる 

トム 人 人 人 人 4 まず まず で ある 


ААДА 普通 


vvv 少し も の た りな い 

%% 劣っ て いる 

% 劣悪 で ある 

評価 グル ー プ 

有田 隆也 青木 秀 浩 祝 一 平 牛 嶋 昌和 小笠 原 吉 義 pom 
清水 和 人 ЯН Ш SFR 谷川 展 子 三宅 流 衣 子 Itti Rittaporn 


IIIIII 


サン ダー フォ ー ス が 出 た あと だ け に , 期待 は 難 か し いか な と 思っ て い 
た ん で す が , な ん の な ん の 。 それ な り に 趣向 を 凝ら し て お り ま す 。 

まず , ジ ョ イス ティ ッ ク が 使用 で き , 熱 中 の あま り キ ー ボ ー ド の た た だ き 
すぎ で 手 が 騰 輔 笑 に な る と いう の は 防げ る よう に な り ま し た 。 良かっ た 。 
た だ , スク ロー ル の し すぎ で 目 が 寄れ る 恐れ が ある の は , 相変わらず の 
Юэ ет» 気 を つけ まじ よう ね 。 

画面 数 は 定か で は あり ませ ん が , シー ン に よっ て は , —WHomsui i 
っ 暗 に な っ た り , 画面 が 突然 4 分 割 し て 目 が 散っ た り と , 大 変 目 まで る 
し い の で す が ,。 オ ッ / と 思う の は シー ン 3 まで で , シー ン 4 から は 組 
み 合 わせ の バリ ー エ ーション と いう 感じ 。 加 えて 。 登場 する キャ ラグ クタ 
の 多き に は ぴっ くり し ます よ 。 ま さ に 自分 を 見 失う ほど で すか ら こ れ は 
すご ざい 。 それ に し て も 。 どの じ で リア ルタオ ム ゲ ー ム の マニ ュ ア ル に 書 
か れ て いる 物語 と いう も の は , 取っ て 付け た よう な も の が 多い の で し ょ 
Sh. もう少し , この辺 を 考え て みた だ いも の で す 。 (R.M.) 
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バ パック マン 
~ リア ル タ イ ム ア ク ショ ン ゲ ー ム 
使用 機種 : MZ- 700/1200/80K/C 
必要 な 機器 : PCG 使 用 可 
Buon qo 
価格 : 3,000 円 

発売 元 : 電波 新聞 社 
1203-445-6111 


ッッ クマ ン と 言え ば 。 も うだ いたい の ゲー ム 小 僧 は 知っ て いる は ず だ 
ろう 。 ア メリ カ で も 大 人 気 を 博 し た ゲー ム で ,。 ゲー ムセン ター に は 必ず 
お いて あっ だ た だし, キャ ラク ター 商品 も 出回っ て いた 。 

今回 , 電波 新聞 社 か ら 発 売 き され た パッ クマ ン は , MZ-700, MZ-1200, 
MZ-80K/C と どう し て も グラ フィ ッ ク 機 能 で 他 の 機種 に 劣っ て いた 分 
t, PCG と いう 周辺 装置 で , 高 解 像 の グラ フィ ッ ク を 得る こと が で き 。, 
ゲー ムセン ター に お いて ある , あの 画面 と か わら な いよ うに な っ て いる 。 
も ちろ ん , PCG を 持っ て いな く て も 。 ノー マル タイ プ の プロ グラ ム が 入 


っ て いる か ら , ゲー ム が で きれ ば それ で いい と いう , 横着 者 の 少年 6 い 
る と 思う が , せっ か 〈 く PCG プ ログ ラム が 入っ て いる の で , ゲー ムセン タダ 
ー の 雰囲気 に こだわ っ て 楽し ん で も らい だ たい 。 

ゲー ム の 内 容 に つい て は あえ て 説明 は し な い 。 ゲ ー ム セン ター の 物 と 
ほぼ 同じ だ か ら 。 た だ が, 
どう か も し れ な い が …。 


レバ ー が テン キー に か わっ た の で , 最初 は と ま 
(N.T.) 


| = 
қуат 


スペ ー ス ・ ク ルー ザー 
~ リア ル タ イ ム ア ク ショ ン ゲ ー ム 
使用 機種 M z -2200/2000 
必要 な 機器 : M 7-2000 は G-RAM 要 
"k E Ug JR TEM バン 
価格 : T : 4,500 円 / 5 D : 7,500 円 
発売 元 : ニ デ コム キャ リー ソフ ト 
0963-63-0211 


この リア ル タ イ ム ゲ ー ム は , アー ケー ド ゲ ー ム か ら の 移植 版 で 。 オリ 
ジ ナ ル に 少し 手 を 加え た も の で す 。 と いっ て も , 最近 の アー ケー ド ゲ ー 
ム の 人 気 は 。 スクロール ゲー ム ま だ た は, スポ ー ツ ゲー ム に 集中 し て いる 
ОС, これら の ゲー ム フ ァ ン に と っ て は , 少し 物足りな い の で は な いで 
し ょ うか 。 と 言い な が ら も 。 評価 と そっ ちの け で 遊ん で し まい まし た 。 

る て , 最初 に 母船 を 中 心 と し た UFO 連 隊 に 遭遇 し ます が , 母船 を 最 
後 ま で 残し て お く と , 母船 か ら 発射 され る 波動 エネ ルギー 砲 が , 普通 の 
倍 の 速度 とし なり, これ を 避け な が ら 母 船 を 撃破 する に は , 一 苦労 きせ られ 
ます 。 ま た 第 2 面 で は 自分 が 下手 な の か , アス テロ イド ゾー ン の 流星 の 
雨 あ られ の 前 に は , 何 度 か 撃墜 きれ まし た 。 し か し , よく 考え て みる と , 
流星 群 を 攻撃 し て や られ た の だ か ら ,。 この 場面 は 徹底 的 に 逃げ る only で 
сс, な ど と 安易 な 考え か ら 実 行 し た ら , ホン ト 簡 単に クリ ア し て し ま 
いま し た 。 だ た だ だ, 得点 は アッ プ し ませ ん けど 。 


全体 を 通し て , 敵 が も うぅ 少し 巧み に 攻め き て ほし いで すね 。 (SS) 
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マツ ツ ツ ツ st: サツマ 9 
vvveveuunvsewvev 


ト 人 人 人 人 шө өөр 
wee 独自 性 VV 
wwe 物語 性 VV 
vvyyvy zt vvvevev 
vvv HH vvvvvv 


ゲー ム の 内 容 は 説明 する まで も な いで し ょ う 。「 イ ン ペ ベ ペー ダー ゲー ム 」 
に つい で 大 ヒッ ト し た , あの 『「 パ ッ ク マ ン 」 で す 。 こ の ゲー ム ば , 1X 
始め る と 思わ ず 熱 中 し て し まう 魅力 を 持っ て いま す 。 最 近 は ゲー ム セ 
ンタ ー で も あま り 見 か け な く な っ て し まい まし た 。 もう 1 度 思 う ぞ ん ぷ 
ん 遊ん で みた い 人 , まだ 1 度 も パッ クマ ン を や っ た こと の な い 人 入 , 買っ 
て お いて 損 の な ぃ ソフ ト だ と 思い ます 。 
MZ-80K/C/1200 で も 使え を 。 MZ-700 で は 当然 な が ら カ ラー で 表示 さる 
れ ま す 。 セ ミグ ラフ ィ ッ ク を 使っ て パッ クマ ン ら し い 形 を 出し て いま す 。 
il, PCG を 使え ば ゲー ム モ セン ター の も の と くら で て も 見 劣り し な い 
画面 に な り ま す 。 PCG 用 の プロ グラ ム は テー プ の BB 面 に 入っ て いま す 。 
オー ル ・ マ シン 語 で で き て いる だ た め ス ピー ド も 十分 で す 。 欠点 は と い 
5L, や は りあ る 程度 続け る と 飽き て 〈 る 点 で し ょ う 。 「 今 きら パッ ク 
マン な ん て 」 と いわ ず に 再度 挑戦 し て み ま せ ん か 。 (Ү.5.) 


70797720064 
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ニ デ コム キャ リー ソフ ト プ ラ ンド の 製品 で 1 作 目 「 フ ロン トラ イン 」 
に 続く アー ケー ド ゲ ー ム メー カー, タイ トー 社 同名 ゲー ム の パッ ュ ン 映 
像 複製 ソフ ト 。 前 作 同 様 。 キ ャ リー ラボ が 移植 な ど 技 術 面 を 担当 し , = 
デュ が 売り 出し て いる も の 。 テ ー ジ ,。 ディ スク と 媒体 の 違い に より 2 種 
類 用 意 さ きれ て いる 。 今 回 評価 に 使用 し た も の は テー プ 版 で ある が , 内 容 
は ディ スク 版 と も に 同一 ど で あ る 。 オ ー ル マシ ン 語 で IPL か ら ロ ー ド する 方 
式 で ,. キ ャ リー ラボ オリ ジ ナ ル モ ニ タ TS-2000 上 で 動作 す る 。 多 分 BASE 
や WICS な ど で 開 発し た も る の で あろ う 。 思っ た より 高速 で 申し 分 な い 。 
オリジナ ル の ほう を 遊ば れ た 方 に は どの よう な も の か お わか りか と 思う 
м, イン ベー ダ ゲ ー ム の 発展 上 に ある も の で い 〈 く つか の 違っ た ステ ー ジ 
が 順に あら われ る 。 動き は 複雑 で よく 敵 を 見 て いな いと ゲー ム オ ー バ ー 
に な っ て し まう 。 よ く 見 て いる と オリ ジ ナ ル に 比べ アル ゴリ ズム は か な 
り 割 愛さ れ て いる が 。 プ レイ 自体 に 支障 を きた す ほ ど で は な いよ うだ 。 
初め て 遊ぶ 人 に は 結構 楽し ゅ る し , 奥 が 深い ゲー ム と いえ そう 。(H.A.) 


опхо яши i 
a ~ パソ コン 学習 ソフ ト V 
・ 中 学 必修 英 単語 PART- I S 
高校 必修 英 単語 yu d 
使用 機種 MZ-700 


* 5 жеке 岡山 マイ コン シス テム 


ДААД АДАА 
VVVVY 画面 処理 ДДАДА 
өчүү яш фуу 
サエ ラー 処理 りり 
vvvee xm: wwvev 


I have to get up at five 


に また オオ メル ジル 


英 単語 クロ スワ ー ド パズル は , 英 単語 の 学習 用 も し て ,。 本 な ど に も な 

っ て いま す が , この ソ ツ フト は それ を ブロ グラ ぷに もじ で し まっ た 。 し か も 
その 上 , クロ スワ ー ド を 完成 する と , シン プル な も の で ある が ゲー ム を 
や ら せ て くれ る と いう , な か な か に 親切 な ウフ ト で す 。 種類 は , 中 学生 
用 が PART-I~ 皿 , 高校 生 用 が PART- I 一 Y ま で の 合 証 8 種 で す 。 を 
れ ぞ れ に 出 て くる 単語 も 大 体 に お い ぃ て 妥当 で すね 。 

ST, それ ぞ れ 1 本 の ソフ ト に は , 9 つの クロ ロス ワー ボド フ パ ズル が 入っ 
сел, 初段 , 二 段 , … 八 段 。 名 人 と な っ て いま す 。 БЕСІНЕ, 
ヒン ト を 見 せる 回 数 が 減っ て いき ます 。 

クロ スワ ー ド パズル の 完成 の し か た は , まず , タテ か ヨコ か を , A か 
B で 指定 し , 次 に x, y 座 標 で 位置 を 指定 し ます 。 この と き 第 一 セン ト 
が 画面 の 下 に 表れ ます 。 こ の 第 一 ヒン ト だ け で わか つた 場合 は Y を 入力 
LT, 単語 を 打ち 込み ます 。 わ か ら な い 場 合 は N を 入力 し て 第 二 ヒ ント 
を 見 ます 。 そ れ で も わか ら な けれ ば , 再度 N を 入れ て , 第 三 モ ント で す 
が , ヒン ト は ここ まで し か あり ませ ん 。 結 局 見 当 が つか な らい 場合 は , R 
を 入力 し て も と に 戻り , 別 の 方 向 か ら 攻め る こと に な り ま すね 。 だ た し , 
あん まり こん な こと を 繰り 返し て いる と 。 ヒ ント を 見 る 回 数 に は 制限 が 
あり ます か ら , 注意 が 必要 で す 。 一 応 全部 埋め 終 び る と “BAD" か GOOD” 
が 出 ま すか ら , BAD の 場合 は , も ぅ 一 度 よ く 考 えて 修正 と いう こと に な 
り ま す 。 どこが 誤っ て いる の か 教え て くれ な い の が 憎たらしい で すね 。 

単語 の 位置 を 指定 する の に , 座標 で 打ち 込ま な けれ ば な ら な いあ た り 
は , ちょ っ と 操作 性 に 欠け ます が , こん な ソフ ト も あっ て よい で し ょ う 
ね 。 (Y.T.) 


遊び な が ら 学 ぼう と いう 試み は , 教育 関係 者 た ち に と っ て の 理想 で あ 
り ま し て , 昔 か ら 歌 に あわ せ て 覚え た だ たり と か , ぬり 絵 を し な が ら 6 学ん だ 
り と いろ いろ 考え られ て きま し た 。 そ の 中 で も っ と も ポピュラー な の が 
クイ ズ 和 形式 の 問題 で , クロ スワ ー ド パズル な ど は まき に 本 家 本 元 と いえ 
まし ょ う 。 それ を , パ ツ ソコン に や ら せ て し まっ だ の が 。 この クロ スワ ー 
ド 英 単語 で す 。 ク ロス ワー ド 中 学 必修 英 単語 PART T -MDE 3 巻 。 ク 
ロス ワー ド 高 校 基礎 英 単語 PARTTI 一 V の 全 5 巻 で す 。 

以前 か ら , 教育 ツ フ ト と し て いく つか 各社 か ら 発 売 さ れ て お り ま し た 
が 。 必修 。 基礎 と 銘打ち な が ら 期 待 は ずれ な の が 実に 多かっ た だ 。 ど だ い 
数 多い 単語 数 の 中 か ら 1 本 な いし 2 本 の テー プ に 収め て し まお うと いう 
の が 無理 な こと で し て , 選択 する 単語 と 作る パズル の 間 に ギ ャ ッ プ が 生 
じ る の は し か た の な いこ と な の で し ょ う 。 確か に , マメ タン 。 シ ケ タン 
を 参考 に し た と し て も , すべ て を 網羅 でき る わけ で は な く 。 また それ ら 
すべ て の 単語 が 必修 で ある わけ で も な いで すか ら , その 周り が 教育 ソフ 
ト を 作る うえ ぇ で の 難し いと ころ と いえ ます 。 

と いう と ころ で この ソフ ト は , 中 学生 用 3 巻 , 高校 生 用 5 巻 と 多少 の 
物足りな る は ある と し て も よく 集め て あお 9 お まけ に , で き あ が る と ゲ 
ー ム が で きる と いう の が な け て くる と ころ で す 。 ゲ ー ム 自体 は と て も 簡 
単 で ある と し て も , 各巻 それ ぞ れ 違っ た プロ グラ ム が 入っ て お り ま す 。 
ちな み に , 中 学生 用 で は SKY HELPER, パク ライ , UFO CRASH, & 
校生 用 で は , メイ ロペ ニック, カー レー ス , ドッ キン グ ,。 ブロ ッ ク く ず 
L, マツ タケ が りな ど で す 。 た わい の な い ゲ ー ム は ちょ うど 勉強 の あい 
間 の Coffee Break で すね 。 た だ , キー 操作 が 多少 ゆん どく きい の が 気 に 
LUE S Es AA (R.M.) 
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圧倒 的 面 数 , 何 と 200 面 を ほこ る ゲー ム で 
す 。 世 界 的 に も (?) めった に 聞き ませ ん 
な あ 。 し か も カセ ッ ト テ ー プ で 供給 きれ る 
の で すか ら 。 

プル ー ス トー ン を プル ー エ リア に 持っ て 
いく こと に より 1 面 が 終了 し ます 。 プ レイ 
ヤー が 操作 する の は ヒヨコ の よう な か わい 
らし い キ ャ ラク タダ の フラ ッ ピ ー で , スト ー 
ン を 押し て 移動 きせ る こと が で きま す 。 押 
すこ と だ けが で きる と いう の は あの 11 面 以 
降 が イヤ ラ シ イ 「 倉 庫 番 」 に 似 て いま すね 。 
フラ ッ ピ ー は 平面 図 で は な 〈 横 か ら 見 た 図 
が 画面 に 示さ れ て お り , きち ん と 重力 に 徒 
っ て 落下 し ます 。 

押し て は 落と し 押し て は 落と し を 繰り 返 
すこ と に より ゲー ム は 進行 し ます 。 プ ルー 
スト ー ン の ほか に レッ ドス トー ン が 何 個 も 
あり , これ を ブル ー ス トー ン の 移動 を 助け 
る だ め に 使い ます 。 こ の レッ ドス トー ン は 
も ろく, 壁 や フラ ッ ピ ー な ど で は さま れ て 
押 き れる と つぶ れ て 消 減 し て し まい ます 。 
この レッ ドス トー ン を どの よう に 使う か が 
ミッ で あり 魅力 で も あり ます 。 

これ だ け で は ふつ う の パ ズル 型 の ゲー ム 
で す が 。 エ ビー ラ と ユニ コー ン が ジャ マ を 
し て きま す 。 制 限 時 間 が あり 敵 が お そっ て 
Ç る た め に , 反射 神経 型 の お も し ろ さ る も 加 
味 る きれ て オリ ジ ナ リティ あふ れる ゲー ム と 
な っ て いる の で す 。 ユ ニコ ュ コーン は それ ぞ れ 
一 定 の 高き の と ころ を 動い て いま す が エ ビ 
ー ラ は どん どん フラ ッ ピ ー を 追っ て くる の 
で 気 が ね け ま せん 。 や っ つけ る に は スト ー 
ン を 落と し て つぶ すし か あり ませ ん 。 た だ 
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ГІ АРРҮ 2 
使用 機種 : X1/X1C/X1D 
価格 : テー プ 版 /4,500 円 


5D, CF 版 /6,800 円 
発売 元 : デー ビー ソフ ト 


容 011-251-7462 


o0 これ を や っ て は ダメ НИТ ZZ YI 


② ガ ー タ ー ⑦ ダ ル マ 落 と し 
С) 9 
Es 
4 ム 石 は 押す こと は で き て も 引く 人 人 「 も うす ぐ ゴ ー ル だ ! ERE 
P PRIM いて ゴー ル と 青 石 の 間 に ユ ニコ 
こと は で き な い の で 青 石 を すみ 積み 重なっ た 石 の 下 の 方 を 押し 


に 持っ て いっ て し まう と も う ダ 
メ 


ー ン を 入れ て し まう と 万 事 休 す 。 


切っ て し まう と 上 の 石 が 落ち て 押し つけ て も , や っ つけ る こと 
ат, つぶ され て し まう 


は で き な い の だ 。 


А 2) лене ЖУ 2 Шоу 2 


人 4 青 石 の 通り 道 に 穴 が ある と き に 
8, 赤石 で 埋め る べし 。 上 を 青 
石 が 通っ て も こわ れ な い が 押 せ 
ば こわ れる 。 


⑦ 半 ズラ シ 


〇 みか ど つ ぶし レ 


ガー ター を さけ る テク ニッ ク で ある 。 ま ず 赤 石 で か ど を 埋め , そ の 上 
を 青 石 を 通す 。 そ れ か ら 赤 石 を 上 か ら つ ぶせ ば よい 。 


〇 投げ 上げ 


る か ら で あ る 。 


ズラ すこ と が で きる 。 さまざま な か な 応 


用 の も と に な る 。 


し 武器 と し て 催眠 きのこ が あり , スペ ー ス 
キー を 押す と 今 向 いて いる 方 向 に 飛び 出し 
ます 。 こ れ は 一 定時 間 だ け 相 手 を マヒ させ 
る こと が で きま す 。 

200 面 と 聞く と うん ざり し て し まう 人 も 
多い か も しれ ませ ん が , どの 面 も それ ぞ れ 


< きのこ を ユニ コー ン に 
(9 噴射 する と き に は な る 
+ ) べく 下 か ら 行 な っ た ほ 
う が よ い 。 な ぜ な ら ば 
е, は ずれ て も , 重力 の 影 
響 で 再び すぐ 戻っ て く 
«nlii, AI 個 分 で は な く 半 個 分 だ け 


個性 が あり , 数 だ け 増 や し た の で は な いこ 
と が すぐ わか り ま す 。 一筋 縄 で は 解け な い 
よう な 面 も 多く , 数 人 が か り で 考え な く て 
は 解け な か っ た 面 も あり ます 。 絶対 あ きら 
め な いで いや と いう は ほど 考え ん る こと , それ 
だ け で す 。 高 〈 評 価 し た いも の が 『 パ スワ ー 


СЕ ай ҰЛАН ЫЫ AS 


で 編 間 空中 押し 


ム 下 の 石 を キズ ラ シ し て か ら 上 の 石 を 落と し ひっ か ける 。 次 に そ 
の 石 を 押す と , 半 個 分 ズレ た と ころ に 落と すこ と が で きる 。 こ 


れ に より , 溝 を こえ た り で きる 。 


ド 』 で す 。 こ れ は 5 面 ク リア ご と に ひと つっ ず 
つ 与 えら れ ま す 。 こ れ を 使え ば 次 に 挑戦 す 
る と き に 途中 か ら 開 始 す る こと が で きる の 
で す 。 じつに うれ し い 機 能 で すね 。 今 まで 
の 「 大 作 」 と 呼ば れる ゲー ム で は , 死ん で 
し まう と ふり だ し と いう も の が 多く , 55 


3 エピ ー ラ を や っ つけ る 基本 的 
戦術 で ある 。 す ぐ 岩 石 を 落と 
せる 状態 で 待ち ぶせ し て お き 
タイ ミン グ よ く 落 と す 。 


xo ) wsosscs 5 応 


の @ 半 ズラ シ ヒ ツ カ ケ 


だ 。 


ッ ク 


⑦ 半 ズラ シ 橋 わた だ し レ 


② カ ニー ば さ み 


えさ せる 。 


で ある 。 


1 度 最初 か の ら や る の は ちょ っ と と いう パタ 
ー ン に お ちい り が ち で し た 。 

私 が 体得 し た 種々 の テク ニッ ク を まとめ 
て み ま し た の で , おぉ 役立て くだ さい 。 半 ズ 
ラ シ の 応用 法 を マス ター し , エ ビー ラ か ら 
自由 に 逃げ ば まわ る こと が で きた ら 案 外 簡 単 


4 別に や っ つけ な く て も , どこ | 
か に 閉じ 込め て し まえ ば よい の ._ 


うまく, 岩石 の 落下 する と こ 
ろ に きのこ を ふき つけ て 眠ら _ 
せ て お いて か ら , 岩石 を 確実 - 
に 落と し て や っ つけ る 。 1 


3 石 4 個 分 の 穴 を 半 ズ ラ シ ヒ ッ カ ケ な ど 
を 用 いる こと に より 。 3 個 で 埋め て か 
ら 上 を 青 石 を 通過 させ る 。 


3 エ ピー ラ を ひき つけ て 

ва, その 間 に 赤 石 を 
。 は さ み つ ぶし , 青 石 を 
落下 させ る 。 こ れ を 使 
わな いと ダル マ 落 と し 
で や られ て し まう 。 


A ム 積み 重なっ て いる 石 を 慎重 に ズラ し て 斜め に する 。 そ し て 一 番 上 の 青 石 を 落と し て 溝 を こ 


くつ っ か えて いる 赤石 を 押し た 直後 , 青 石 の 落下 に 合わ せ て 押し 出し 青 石 だ け を 横 に 突く も の 


に 面 を 突破 する こと が で きる で し ょ う 。 こ 
の テク ニッ ク を すべ て 身 に つげ, 「 こ の テ 
クニ ッ ク が の っ て いな いな あ 」 な ど と いい 
だ し た な ら ば , あな た は も 5200 面 に 到達 
し て いる か も し れ ま せん ね 。 (有田 隆也 ) 
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САМЕ БОЕТ 
. の る ° 
ВАХТ シリーズ jE ET EFT хет сены 
RW 挑戦 / жолы / パル コム XI 
(GRAM) -Т- 3,008 / わが 太陽 系 
連邦 軍 特 殊 部 隊 は , 帝国 司令 部 を 目前 に し て 帝 
国軍 の 反撃 に より 全 減 寸前 だ っ た 。 ど うき り ぬ 
ける か は , あな た の 手 に か か っ て いる / 
に ワー ド 8 Z エニ ックス ХІ -Т- 
3,600 円 ^ 超 科 学 戦争 の 真 最 中 。 今 , 栄光 
へ の 脱出 が 始ま っ た 。 X | の 持つ 機能 を フル に 
活用 し た リア ル な 効果 斉 と ジョ イス ティ ッ ク 対 
応 が 魅力 。 画 面 が 8 方 向 に スク ロー ル す る SF 
ダイ だ ミッ みみ ゲー ム 。 
FREE / VING SOFT X! (GRAM) 
—T- 3,8008, -50- 6,8005 / 麻雀 
が で き な い 方 に は コン ピュ ー タ が 指導 致し ます 。 
4 段階 の レベ ル 設 定 が 可能 で , 漢字 表示 ( 漢 RO 
M 不 要 ), リピ ー ト 機能 , リプ レイ 機能 が あり ま 
す 。 
э? 信長 の 野望 / 光栄 マイ コン XI(G-R 
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AM) -Т- 4,5008 戦国 時 代 , 弱小 尾 
張 を 率い 天下 統一 を 夢み , 実現 し た 織田 信長 は 
戦 の 天才 だ 。 今 , 貴方 は 信長 と な っ て 各地 の 猛 
将 と 戦わ ね ば な ら な い 。 果 た し て 貴方 は 天下 を 
統一 で きる か 。 

ホイ ホイ / 光栄 マイ コン ХІ (GRAM) 
ーTー 3,008 / 不精 な 貴方 の 部 屋 は 今や 
ゴキ ブリ 天国 。 貴 方 は 押し 寄せ る ご き ぶ りか ら 
ケー キ を 守れ る か ? コミ カル な パロ ディ シミ 
ュ レ ーション 。 

\ ナ イト ライ フ ノ 光栄 マイ コン Х!/Х!С 
-T- 4,500 円 / コン ピュ ー タ が , 安全 日 
危険 日 の 判断 か ら , 2 人 の 予定 プレ イタ イム に 
基づき , 最適 な 体位 を いく つか 選び 出し グラ フ 
ィ ッ ク 表 示 で 同時 進行 で お 教え し ます 。 ア ダル 
ト ソ フト の 代表 作 。 


я? フラ ッ ピ ー Z デー ビー ソフ ト хі 


—5D, CF— 6,800] / 大 好評 の フラ ッ ピ 
ー の ディ スク 版 。 


8MZ-700/1200/K/C Жани 


АРАОТОСВАСҮ/ BASIC HOUSE MZ- 

700 -Т- 3,8009] / ある 朝 , あな た は 
起き て すぐ 昨日 見 た 夢 を 思い 出し まし た 。 そ れ 
は 不思議 な 夢 で , 地球 の どこ か て 独裁 政治 が 行 
な われ て いて , そこ に 住む 住民 た ち が た い へ ん 


困っ て いる … と いう 夢 で し た 。 そ し て … 
牧 タイ ムシ ー ク レツ ト パス カル HI MZ 
I200/K/C —T-— 3,3009] / すでに 圧倒 
的 な 評価 を 得 て い る タイ ムシ ー ク レッ ト の 1200 
/ K / C 版 登場 。 
ШМ2-2200/2000 х= дер SEDENS 
ナイ トラ イフ ノ メ 光栄 マイ コン M2200 
-Т- 4,500 円 / コン ピュ ー タ が , 安全 日 
危険 日 の 判断 か ら , 2 人 の 予定 プレ イタ イム に 
Жа, 最適 な 体位 を いく つか 選び 出し グラ フィ 
ッ ク 表 示 で 同時 進行 で お 教え し ます 。 ア ダル ト 
ソフ ト の 代表 作 (カラ ーBASIC 用 )。 
MZ-5500 シ リー X Gs mE заны 
% 北ア フリ カ の 嵐 /  Brainhill MZ-5500— 5 D — 
1,008 / 北ア フリ カ 砂 漠 を 縦横 に 疾 駆 す 
る 名 将 ロ ン メ ル に 対し て , 英軍 は 大 攻勢 に 転じ 
た 。 一 方 ロン メル に と っ て , 頼り に な る の は 一 
握り の ドイ ツ ・ ア フリ カ 軍 団 の 精鋭 の み / 物 
量 を 誇る 英軍 を た た きつ ぶし , ふた た び ア フリ 
カ 砂 漠 を 手中 に お さめ る こと が で きる だ ろう か 。 
S, 北ア フリ カ に 鋼 の 嵐 が 吹く / 
э? 外 宇宙 艦隊 を 撃破 せよ / Braimhil MZ- 
5500 -50- 7,800 円 太陽 系 を 開発 し , 
繁栄 を 詩歌 する 地球 人 。 し か し , 秘か に 侵略 者 
は 近寄っ て いた …… 今 , ナゾ の 敵 は 外 殻 基地 を 
破壊 し , 太陽 系 の 中 心 部 へ 迫 ろ うと し て いる 。 
強大 な 外 宇 宙 勢 力 を 前 に , 綿密 な 作戦 と 指揮 が 
人 類 の 運命 を 分 ける 。 果 し て 地球 は 救 わ れる か 。 
P —)0И ИЕ /  Brainhil MZ-5500 
-50- 7,8008 / 太 陽 に 向け , 凄まじ い ス 
ピー ド て で 進撃 し て くる 恒星 破壊 兵器 “モー ル ”。 
迫り 来る 危機 か ら 大 陽 を 救う に は , コマ ンド チ 
ー ム が モー ル に 進入 し , 制御 シレ ステ ム を 破壊 す 
る し か な い 。 太 陽 消 減 を 目前 に , 特攻 作戦 は 始 
まっ た 。 コ ンピュータ ・ ス トラ テ ジ ー ゲ ー ム 。 
タウ ルフ パッ クノ  Brainhil М2-5500- 5 D.— 
7,8000 / AACH 5 UR= koX 
威 は , 宿敵 イギリス を 恐怖 の どん 底 に 陥れ た 。 
目標 は 航行 する すべ て の 敵艦 船 。 そ し て イ ギ リ 
ス 海上 補 絵 路 の 寸断 。 戦 果 は いか に / FRED 
幸運 を 祈る 。 


GENERAL SOFT 


一 MZ-700 
£720 A2—F ER - ФТБ — 7 Е 
山 マ イク ロ シ ス テム MZ-700 -Т- 4,8000 
ノ 申 学歴 史 の 重要 な 年 号 を 使用 し て スロ スワ ー 
ド を 完成 する 。 完 成す る と 「 ミ サイ ルコ マン ド 」 
と いう オリ ジ ナ ル ゲ ー ム が で きる 。 ク ロス ワー 
ド に は 初段 か ら 名 人 まで の パタ ー ン が ある 。 
ХТ 20) — Xen oap EPUEENITESURI 
独占 // 情報 管理 プ 近畿 コン ビ ピュー タ サ 
ービス ХІ 一 5D, CF- 15,0009 / 
プレ イ 情 報 , ビジ ネス 情報 を 管理 し , 必要 に 応 
じ て , 検索 する 条件 に よっ て 該当 する 情報 を 画 


面 ま た は プリ ンタ で 出力 で きる 。 メ ー ル 用 シー 
ル , ハガキ の 究 名 印刷 機能 が つい て いる の で 各 
種 催物 , RAR, 会 員 な どの 案内 状 送付 の 宛名 
書き が 簡単 に で きる 。 

今 実戦 // 在庫 管理 ノ 近畿 コン ピュ ー タ サ 
ービス ХІ -5Р, СҒ- 15,0009] / 
スモ ー ル 0O A 用 。 在 庫 金額 | 億 円 未満 。 在 庫 数 
量 !00 万 未満 。。 仕 入 ・ 販 売 管理 の 商品 元帳 デー タ 
の 共用 が で き , 入庫 ・ 出 庫 伝票 発行 機能 付 の 他 , 
商品 在庫 一 覧 表 , 適正 在庫 過剰 一 覧 表 , 適正 在 
ERE XA, 入出 庫 日 計 表 , 入出 庫 月 計 表 な 
ど が プリ ンタ 出力 で きる 。 
ARR // ЕВ и 近畿 コン ビ ピュータ サ 
ー ビ ズ Ж1-:-5р, CF 一 15,0000] 7 
スモ ー ル 0 A 用 。 月 商 ・ 在 庫 金額 | 億 円 未満 。 
商品 在庫 数 は 100 万 未満 。 仕 入 ・ 在 庫 管理 の 商品 
元帳 の デー タ の 共用 が で き , 入庫 ・ 売 上 げ 伝票 
の 発行 機能 の 他 , 請求 書 発行 発行 先 名 簿 , Іт 
品 別売 上 げ 日 計 表 , AHR, 得意 先 別売 上 げ 月 
BER, 入金 日 計 表 、 その 他 が で きる 。 
^ 旋 漢字 顧客 台帳 一 漢字 版 宛名 書 バ ッ ケ ー ジ 
Z жа XID ( 要 漢 字 ROM) 一 CF 一 19,800Ғ3 
Z REN, Қ%, キー ワー ド の 項目 の 高速 サ 
ー チ , その 他 全 項目 の サー チ 可 能 , 漢字 検索 可 
能 。 カナ 漢字 変換 , 熱 語 登録 語 500 語 可能 。 顧 客 


パソ コン と の 本 提 棋 で 難点 の ひと つと さき 
れ て いた の が 、 コ ンピュータ くん の 長 考 。 
し か し , 思考 時 間 も 、 か な り ス ピー ドア ッ 


TL, イラ イラ せ ず に 済む よう で す 。 

な に より うれ し い の は , ХОНОВ 
定 が 自由 に で きる こと 。 名 人 戦 を 再現 し て 
途中 か ら 自 分 で 指し た り , BJ ORIS 
棋 も 自在 な の で , 楽し み の 幅 が 広がり ます 。 
ОХТА ( 要 6-RAM), MZ.2200/2000 用 ( 要 6.RA 


MI.2.3). テ ー プ 版 。 各 4,200 円 
マイ コン ハウ ス SPS 7%0245-45-5777 | 


デー タ 最 大 登録 件 数 800 件 。 今 日 か ら 使 える タッ 
クシ ー ル |!000 枚 入 
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ASUPER PRO 販売 , ЖЛ, 在庫 管 
BE / リー ドレ ックス М2-5500 —5D- 
200,000 円 / s HSER, 買掛 金管 理 , Ж 
ЖИЕН, 在庫 管理 。 mm 締 日 に は 請求 書 を 自動 発 
行 。 W 棚 卸し も 簡単 。 m 各 種 日 報 , 管理 資料 も 
SE. m 漢字 で 表示 ・ 印 刷 。 m 売 上 伝票 , 請求 
書 は (株 ) 日 本 法令 製 を 使用 。 m 画面 と の 対話 型 
入力 で や さ し い 操作 。 

25gSUPER PRO 財務 会 計 ノ リー ド 
レッ クス MZ-5500 -50- 250,000 円 / 
ョ 仕訳 入力 だ け で 決算 まで 。 m 月 4,000 件 まで 
の 仕訳 が 可能 。 勘定 科目 は 358。m 内訳 設 定 で 
補助 簿 作 成 。 m 摘要 は 2 タイ プ 。 漢字 で 表示 
印刷 。 mW 二 重 の 機密 保護 機構 

#SUPER PRO 給与 計算 ノノ リー ド 
レッ クス М2-5500 - 50- 200,000 円 // 
= 月 例 給料 , 賞与 か ら 年 末 調 整 ま で 。 m 時 給 者 , 
日 給 者 も 処理 可能 。 銀行 振込 の 依頼 も 簡単 。 
s (株 ) 日 本 法令 の 帳票 を 使用 。 m 漢 字 で 表示 ・ 
印刷 。m 変 動 デ ー タ の 入力 だ け で 給与 明細 書 。 
s 支給 対象 者 は 300 名 まで 。 支払 額 の 端数 整理 
が で きま す 。m 機密 保護 機構 

謝 実 戦 仕 入 管理 / 近畿 コン ビュ ー タ サー ビ 
A ХІ —5D,CF- 15,008 / スモ ー 
LOAR., 月 仕 入 金額 ・ 在 庫 金額 | 億 円 未満, 
在庫 ・ 販 売 管理 の 商品 元帳 の デー タ の 共用 が で 
а, 仕 入 伝票 , 出庫 伝票 発行 機能 の 他 , 商品 別 
仕 入 月 計 表 , 支払 い 日 計 表 , 仕 入 先 別 仕 入 日 計 
Ж, 仕 入 先 別 仕 入 月 計 表 , 買掛 け 残高 表 , 商品 
在庫 一 覧 表 な ど を プリ ンタ 出力 で きる 。 


アニ メデ ィ タ ー 


X 1 の 持つ PCG 機 能 を 生か す た め の エ デ 
42. 作成 し た デー タ は , あら ゆる 応用 を 
BEL, マシ ン 語 デー タ と し て 保存 , BA 
SIC で 取り 出す こと が で きる と いう 汎用 性 
を 有する 。 プ ログ ラム は マシ ン 語 で Hu 
BASIC の モニ タ か ら ロ ー ド 。 その 基 で 動作 
する 。 サ ンプ ル デ ー タ が 付属 。 

HuBASIC で は DEF CHR$ で この PCG 
を サボ ポート し て いる が ,。 あく まで も 領域 に 
デー タ を セッ ト す る だ け で エディタ 機 能 
は な い 。 つ まり , この DEF CHR 命 令 を 使 
うた め に は 何ら か の 手段 に より ,、 フォント 
を デザ イン し デー タ に 変換 し て や ら な けれ 
ば な ら な い 。 こ う ひ と 言 で 表現 で きる が , 
これ を 手 で 行なう と 実に し ん どい 。 

価格 が 5,800 円 と 少々 高い よう な 気 が す 
る が , あっ て 不便 な も の で な く 、 ゲ ダー ムキ 
ャ ラク タ を デザ イン し た りす る 場合 非常 に 
有効 な ツクール と いえ よう 。 処理 も マシ ン 語 
で ある た め 高 速 。 申 し 分 な いと 思う 。 操 作 
性 も 十分 で 必要 な キー イン スト ラク ショ ン 
は 常時 ディ スプ レイ され て いる が , 最初 使 


用 する 際 は 説明 書 に ひと と お り 目 を 通し て — 
お く こ と を お 推 め する 。 モ ー ド は 4 つ あ り 
キャ ン バ パス 、 エ ディタ 。 パ レッ ト , アニ メ _ 
ーション の 各 モ ー ド か ら な る 。 デ ザイ уш 
8 X 8 ある い は 4 キャラクタ 分 16X16 ド ッ 
ト の いずれ で も 可能 。 大 き な キ ャ ラク タ を 
デザ イン する 場合 16X16 ド ッ ト モ ー ド は 実 
に あり が た い 。 そして, 特徴 の 1 つ で ある 
アニ メー ショ ン モ ー ド は 次 々 と キャ ラク タ 
を 写し 動き を チェ ッ ク で きる と いう も の 。 
PCG を 使っ た ゲー ム な ど は 。 この 種 の チェ 
ッ ク が 動き を 安定 させ る た め に 十分 必要 で 
あろ う 。 

X | 用 テー プ 版 4,500 円 発売 元 : ia 
Y— Z COSMIC SOFT 206-344-5150 
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る 「 僕 の いち ば ん 苦し い 時 間 …… 
カッ プラ ー メ ン に お 湯 を つぎ , ファ ン ヒ ー タ ー の 
スイ ッ チ を 入れ , MZ-2200 の BASIC を 立ち 上 げ る 
(さむ 一 い , ひも じい )。 な ぜ , みん な , 2 分 も 3 
分 も か か る ん だ / 1 分 で で きる と か , 一 発 点火 
だ と か 近ごろ ある の に MZ-2200 は ……。 や は り , 
ディ スク し か な い の だ ろう か 。 

北野 利幸 (14) 福 井 県 
を $MZ-700 で CP/M を 使い た い 。 何と か し て お くれ 
mi^ 山 後 誠司 (27) 熊 本 県 
人 はたして, MZ-700 用 の CP/M は 発売 され る の か 
な 。RS-232C ・F カ ー ド も 出 て ほし いし , と 考え て 
いる うち に , また 夜 が 明け まし た 。 

小林 雅彦 (22) 茨 城 県 
を MZ-700 で FD が 使用 で き な い , ESTUDIO MZ に 
よく 書か れ て お り ま す が , 私 は 自分 で 工夫 し て , 
MZ-80K/C 用 の FD お よび プリ ンタ を 使用 し て お り ま 
す 。 向井 康史 (35) 愛 知 県 


ФТНЕ SOFTOUCH が と て も いい 。 2 月 号 の タイ ム 
シー クレ ッ ト を 見 て , すぐ に 質 っ て し まっ た 。 解 
けた あと 3 月 号 を 見 た ら , 「 内 緒 話 」 が わか っ て と 
て も と て も お も し ろか っ た 。 

福島 栄司 (17) 神 奈川 県 
ぐ 初 め て や っ た アド ベン チャ ー ゲ ー ム 「 タ イム ・ 
シー クレ ッ ト 」 が 4 日 間 (8 時 間 ) で 解け て し ま 
っ た 。 も っ と 難し いと 思っ て いた の に 残念 だ っ た 。 
も っ と 難し いう ん と うな る よう な アド ベン チャ ー 
ゲー ム を 紹介 し て ちょ うだ い 。 
金 居 田 陽一 (17) 栃 木 県 


Ф 2 年 前 に 私 が パソ コン を 買お うと 考え て いた こ 
>, 主 に 幅 を きか し て いた ハー ド が PC-880| と M 
Z-80B8 で し た 。 そ こ に 出 て きた の が MZ-2000, で | 
も 2 も な く 購 入 し て | 年 半 。PC は 全 機 種 MKII は 出 
5, 富士 通 は FM-7 で 一 気 に シ ェ ア を 伸ばし , シャ 
ー プ も XI と MZ-5500 を 世に 問う て いま す 。 

だ いた い , ハー ド を 買う と き は , カタ ログ を 見 
て 選ぶ 人 が ほとん ど で し ょ う 。 し か し 最近 , 私 は 
悟り を 開き まし た 。 パ ソコ ン を 買う の に カタ ログ 
は 無用 , 値段 が わか れ ば だ いた い 性 能 の 見 当 は つ 
きま す 。 予 算 が 決ま っ た ら , パソ コン の コー ナー に 
行か ず に , ソフ ト の 棚 に 直行 し まし ょ う 。 そ こ か 
ら 先 は も う 言 いた く あ り ま せん 。 昔 の 栄光 は い ず 
IT, MZ は 地盤 沈下 , 幅 を きか し て いる の は PC シ 
リー ズ , FM-7, XID 3 機種 と MSX ぐ らい で , その 
他 の マイ コン は 「 マ イナ ー コ ンピュータ 」 に な り 
果て て いま す 。MZ を 目前 に し て 思う こと は , と に 
か く ソ フト が 出 な い , と いう こと で す 。 

よく , 隣り の 芝生 は 青い な ど と 言い ます が , ソ 
フト に 関し て は 明らか に PC と FM に 偏っ て いま す 。 
RE, ソフ ト と ハー ド は 車 の 両輪 で 、 よい ソフ ト 
が ある と ハー ド が 売れ る , ハー ド が 売れ る と ソフ 
ト も 売れ る , ソフ ト が 売れ る と 新作 が 増え る , 新 
ソフ ト が 増え る と ハー ド も 売れ る , と いう 具合 い 
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念 毎月 買っ て いま す 。 な ん と な く MZ-700 の ゲー ム 


人 |.FORTRAN を 勉強 し た い 。 
2. だ か ら FD と CP/M が 欲し い 。 

3. だ か ら 1 日 も 早く , シャ ー プ さん が MZ-700 
用 FD と CP/M を 発売 し て くれ る こと を 祈る 。 
4. で も , 国家 試験 に は 間に合わ な い だ ろ うな …。 

吉田 誠 祐 (24) 京 都 府 
な に が フロ ッ ピ ー デ ィ ス ク だ 。 カ セッ ト だ と 。, 
トイ レ に 行け る し , ЖОМ, ジュ ー ス だ っ て 飲め 
る ん だ ぞ ー。 
だ けど , フロ ッ ピ ー デ ィ ス ク 欲 し いよ …… E 
東田 充 紀 (14) 奈 良 県 
はやく フロ ッ ピ ー デ ィ ス ク を 出し て ほし いな 。 
あん まり 待た す と ,。 お こる の だ も の 。 
藤野 清文 (17) 岡 山県 
お 待た せ し ま し た 。 と いう わけ で , 今月 号 の 
トピ ックス 。MZ-700 用 の FD の 記事 読み まし 
ы»?  FD-700 も RS-232C も 用 意 き れ ま す 
k. 


が 減っ て き て いる と 思う の で す 。 
清水 和 人 さん へ 
ぼく も タイ ム ・ シ ー ク レッ ト に 熱中 し て いま す 。 
ほん と に 解け た の で すか ? すご いで すね GE 
くも 頑張 り ま す 。 で も ほん と に 解け た ん で すか ? 
キイ ロイ ハナ が 手 に 入ら な い 。 城 の 王様 に ちら う 
DHIE? ほん と に 解け た の ? 

х 厚 史 (|I4) 埼 玉 県 
キミ も 疑い 深い 人 ネ 。 清水 和 人 と いっ た ら , 
泣く 子 も 黙る アド ベン チャ ー の 鬼 な の だ 。 


だ と 思う の で す 。 し か し , 今 の 状態 は 何で すか 。 
葉 ソ フト ハウ ス の 如く , 80B や XI か ら の 移植 で お 
茶 を に ご し て いる と ころ も あれ ば , と っ と と 880I 
や XI に 乗り 換え た と ころ と か 最初 か ら 完全 に MZ 
無視 を 決め こん で いる と ころ と か , ほん と うに 私 
は , MZ ユー ザー※X 万 人 に な り 代 っ て 部 っ と り 
ます 。 

それ と , 上 位 バ パー ジョ ン 品 の サポ ー ト に も 困っ 
た 点 が あり ます 。 オ ー ル BASIC の ソフ ト だ と リス ト 
を いじ る 程度 で すみ ます が , マシ ン 語 で は そう も 
いき ませ ん 。 せ め て 差額 交換 ぐら い の 誠 意 を 見 せ 
て くれ て も いい と 思う の で す 。 

と か 言い な が ら も , 私 は 自分 の マシ ン を 手 離 す 
気 は あり ませ ん 。 と きど き 考 える の で す が , MZ- 
2000 が 発売 され て 1 年 8 カ月 , MZ-2200 と は ハー 
ド 的 に は 同等 で すか ら , ハー ド は 十分 研究 され て 
いる は ず で す 。DOS も あり ます 。C-DOS(WICS. ВА 
SE), dB コン パイ ラ も あり ます 。CP/M も 一 応 走り 
ます 。 そ れ な の に な ぜ ソ フト が 出 な い の で し ょ う 。 
あと は ソフ ト ハ ウス の 熱意 の み じ ゃ な いで すか 。 
と に か く 全 国 の MZ ユ ー ザ ー は , 良い ソフ ト を 湯 望 
し て いる の で す 。 

ELE, 言い た い 放 題 で し た 。 

須山 隆雄 兵庫 県 


の ファ ン で す 9* 
ous se 


жая 


efOOon/Mzi-Bi;5nctues,ro50l, Ж 
験 で 忙し く MZ-721 に さわ れ な い の で , 一 時 は 愛 機 
を 売 ろ うか と さえ 考え た の だ が , 毎月 Oh /ZMZ を 
買い , 記事 や ブロ グラ ム を 見 て , また 意欲 が わい 
て くる か ら だ 。 だ か ら 0h/MZ は 私 の 愛 機 MZ-721 


の 命 の 恩人 だ 。 ж 司 健 (I6) 大 阪 府 
MZ-721 だ け の 命 の 思 人 じゃ な くく て, キミ に も 
感謝 きれ た い 。 大学 に 受かっ て ネ 。 

金 MZ-2000 を 手 に 入れ て 約 1 カ 月 。 何 も わか ら な 

い 私 は , 難し すぎ る (!?) マ ニュ アル を 相手 に 悪戦 

苦闘 の 毎日 。 だ か ら , 3 月 号 の 「BASIC 入 門 」 は と 

て も あり が た く 思 う の で す 。 

田中 令子 (17) 東 京都 
「BASIC 入門 」 は 数 々 の アプ リケーション を つけ 
т, 介 後 も 皆さん の よい 手助け た な る よう 頑 
張り ます 。 

もう MZ-80K2/K/C は 活き て いな い の で し ょ うか 

7 私 の 愛 機 は 蓄積 され た ソフ ト (各種 記事 ) を 

大 事 に つま みな が ら 働 いて いま す 。 今夏 か ら サ イ 

ボー グ 化 の 計画 も …… 。K/C ユ ー ザ ー よ , 頑張 ろう 。 

山口 昌彦 (27) 熊 本 県 
サイ ボー ダグ 化 が 成功 し た ら ,。 ぜひ 投稿 し て く 
だ さい ね 。 待 っ て ます 。K/C ユ ー ザ ー は 健在 
な り 。 

わか っ た / 文 の は じ め に * 金 "を 入れ る と 載る 

ん だ 。 え , うそ だ ろう っ て 7? ちゃ ん と 載っ て る 

じゃ な いか 。 キ ミ も や っ て みよ う / 

両津 勘 吉 (14) 岩 手 県 
当たり ー。 で も , わざ わざ 人 を 付け て きた 人 
は キミ が 初め て だ よ 。 
を Oh / MZ は , 編集 者 の 写真 を 載せ ませ ん ね 。 ぜ ひ 
女性 の 方 だ け , 写真 を 載せ て くだ さい 。 
小杉 寿 文 (I6) 奈 良 県 
当 編 集 室 に は , 女性 とお ぼ し き 細 集 者 は お り 
ませ ん 。-- 応 , 次 形 は 女性 …… か な ? ER 
わせ る よう な の は お り ま す が 。 い や 、 あ れ が 
女性 だ ど と は 思え を ん の で す 。 あ し か ら ず 。 


ORE, ポケ コン の 記事 が 少な いな , と 思っ て い 
Fb, 2 月 号 か ら 「 ボ ポケ コン 横丁 」 と いう 記事 が 
載り まし た ね 。 こ れ に は と て も うれ し か っ た で す 。 
友だち は XI や MZ-721, JR-200 や PB-100 を 持っ て 
いる の で す が , か れ ら に ボケ コン で も GRAPHIC が 
で きる と いう こと を 納得 し て も ら え まし た 。 
青木 和夫 (12) 茨 城 県 
を 最近 X| を 買い まし て , それ に 合わ せ て Oh / MZ を 
買い まし た 。BASIC の こと も よく わか り ま せん の で , 
遊歩 氏 の BASIC 入門 を 興味 を も っ て 読ま せ て いた 
だ いて お り ま す 。 XI 用 の ゲー ム も プロ ボー リン グ 
と パイ キン を コロ セ な ど , 早速 打ち 込ん て 楽し ん 
で お り ま す 。 
城間 盛 和 (21) 沖 縄 県 


ФИЛ, 6 歳 の お いっ 子 に 「 お ば ちゃ ん , パソ コ 
ン ち ょ うだ い 」 と せま られ , バリ ケー ド で も 築 こ 
うか と 思っ て ます (ジョ ー ク , ジョ ー ク )。 去 年 , 
あの 夏 の 著 さ を 耐え て エア コン が まん し て パソ コ 
ン 買 っ た ん だ か ら 。 今年 は , Xi が 熱 を だ さ な い よ 
うに , エア コン 貯金 を 始め まし た (ダン ナ 様 も 協 
力 お ね が い )。 松田 紀子 (25) 兵 庫 県 
私 な ら 。 パ ソコ ン が まん し て エア コン 買う ね 。 
な ん ちゃ っ て 。 両方 と も 手 が 出 な い 私 な の で 
+, 実は 。 
金 私 の 部 活 で は , 18 人 中 9 人 が パソ コン を 持っ て 
いま す 。 や は り 香 球 部 は 暗い 。 え ー い , MZ-700 は 
負け ん どー。 北山 陽一 (!4) 兵 庫 県 
パソコン 持っ て て 暗い と いう 時 代 は 過ぎ た の 
で す 。 や っ ぱ , 卓球 や っ て る か ら 暗 か っ た り 


どう し て MZ に は セン トロ イン タフ ェ イ ス , フロ 
ッ ピ ー イ ンタ フェ イス , RS-232C イン タフ ェ イ ス , 
GB-IB イ ンタ フェ イス が 内 蔵 さ れ て いな い の か ? 
また , SHARP BASIC や Hu-BASIC な ど , それ ら を コ 
ント ロー ル す る 命令 が な い の で すか ? SHARP è 
ん , 別売 りな ん て …… 。 は た だ た じ て で ミミ まで クリ ー 
ン に する 必要 が ある の で すか ? 最近 少し ずつ 使 
える よう に な っ て , 疑問 や 不満 を 感じ る の で す 。 
メー カー 側 は , 3 年 先 の マシ ン を 考え て いる と い 
う が , 私 の 意見 も と り 入れ て / 
潮見 ЧУ ЕЗЩ 
ユー ザー あっ て の メー カー。 シャ ー プ さん 頑 
張っ て くだ さい 。 
ФА? 「 シ ャ ー プ 」 っ て 13 年 前 は シャ ー プ じゃ な 
か っ た の ? 99), 新聞 を 読ん で いた ら , シャ ー プ 
は 昭和 45 年 に 社名 を 「 早 川 電機 工業 」 か ら シ ャ ー 
プ に 改め た , と 載っ て いて ぴっ くり し て し まい ま 
し た 。 ず いぶ ん 対照 的 な 社名 だ っ た ん だ な 。 
水井 彰 (13) 神 奈川 県 
7 そう だ っ た の 。 実は 私 も 知り ませ ん で 
Ch. 


を Oh/ MZ を 買い に いっ た ら , 大 学生 協 の お じ さ ん 
に 「 工 学部 の 方 で すか ? 」 と 聞か れ た り , | 年 前 


| で は 珍し か っ た パソ コン お ね ー さ ん も , 今 で は す 


っ か り 市 民権 を 得 ま し た 。MZ-700 は 女性 の ユー ザ 
ー も わり と 多い の か な 。 
峰岸 氏 の すす め に 従い 。 タッ チタ イ ビ ン グ の 本 
を 買っ て きた も の の , ビア ノ の 先生 が あき れる ぐ 
らい 指 が 短い た め , [СВ] や [SHIFT| が 大 の 苦手 。 体 
の 大 きい 欧米 女性 & 日 本 男性 が うら や まし い 。 ち 
な み に , 私 は 産婦 人 科 の 医師 は 無理 だ そう で す 。 
この 指 で は / (な ん の こっ ちゃ ) 
平井 真理 子 (23) 宮 城 県 
そう な ん で すか ? 指 の 短い 人 は 産婦 人 科 の 
先生 に な れ な いっ て 。 ところで, あな た は 何 
の 先生 に な る ん で すか ? 女医 に パソ コン , 
力強い 限り で すね 。 
パス カル の 記事 の お か げ で , や っ と パス カル が 
まとも に 使え る よう に な り ま し た 。 今 まで マニ ュ 
アル が な か っ た の で , アド ベン チャ ー ゲ ー ム し て 
まし た 。 コ マン ド の わか ら な い 言 語 は , へ た な ア 
ド ベ ンチ ャ ー ゲ ー ム より お も し ろ い の で す 。 
片山 淳 (22) 福 岡 県 
JA, な か な か 良い こと を いい ます ね 。 ひ と 
つ ず つ コ マン ド を 解析 し て い 〈 HU, £57 
ド ベ ベンチャー ゲー ム に 似 て る か な 。 
@XI 用 の CP/M を 買っ た 。 さ っ そく 起動 し て みる と , 
画面 下 に ファ ンク ショ ン キ ー の 定義 が 表示 され , 
「 ち きしょう , PC みた い だ 」 と 思っ た が , [SHIFT | 
+ で や っ ぱり テレ ビ 画 面 が スー パー イン ポー 
хал, 「 よ し よし ,XI だ 」 と 納得 し た 。 
小沢 - 健次 (24) 長 野 県 
を 私 の 高校 に は , 推定 65 才 の 数 学 教師 , N 先生 が 
いま す 。 すっごく 賢い お じい さん で す が , NHK の 
テレ ビ 講 座 で マイ コン に 魅せ られ た らし く , 授業 
中 に も マイ コン の 話 が 飛び 出し , みん な は 時 間 の 
つぶ れる の を 喜ん で いま す (ちな み に , 先生 の は 
カシ オ の 製品 だ そう で す )。 
西田 慎二 (I6) 大 阪 府 
思い 出す な あ 。 余談 の 好き な 先生 、 み ん な 大 
好き だ っ た も ん ね 。 
ФЕН, 趣 久 し ぶり に ゲー ムセン ター な る も の に 
行っ た 。 高 得点 の だ せ そ うな オー ソ ド ッ クス な テ 
ー プ ブル ゲー ム に 腰 を 落ち つか せ ,100 円 投入 But, 
テン キー 操作 に 慣れ きっ て いた 右手 は , ステ ィ ッ 
ク の 操作 に 対応 し きれ ず , つい に Hi-Score は 出せ 
な か っ た 。 自信 あ っ た の に な あー。 
好 川 一 明 (17) 奈 良 県 
ジョ イス ティ ッ ク を 購入 し て か ら , 再度 トラ 
イ じ で そ み よ お %。 
金 突然 で す が , 質問 が あり ます 。 そ れ は 「 競 馬 予 
想 」 の ソフ ト は 発売 され て いる の に , "BERT TR, 
の ソフ ト は 発売 され て いな い の で すか ? ~ 
肥田 純 治 (I6) 愛 知 県 
キミ が 競艇 や る の か な 7? それ と も お 父さん 
の た め に 探し て る の か な ? や は り , 競馬 よ 
り は 競艇 の ほう が な ん と な く 〈 く マイナー そう だ 
か ら 。 だ けど 。 アルゴリズム は 同じ じゃ な い 


TOMUC тн ж 


Ф 2 月 号 か ら 続い て いる ボケ コン 移植 テク ニッ ク 
は すばらし い / 今度 は 1250 シ リー ズ の 機械 語 の 
特集 を し て くだ さい 。 と に か く こ の 記事 , で きる 
限り 継続 し て くだ さい 。 

根本 洋二 (16) 茨 城 県 
を STUDIO MZ に 出 て いる 人 が プレ ゼン ト を も ら っ 
て いる の を 見 た た めし が な い 。 だ か ら , 載せ な い 
で , プレ ゼン ト だ け く だ さい 。 


же 淳志 (14) 兵 庫 県 
そん な こと は あり ませ ん よ 。 公平 に 抽選 し て 
いる の だ か ら 。 し か し 。 キミ も 暇 で すね 。 
すっ すご い / 直 高 速 ベ スイ ント ルー チン は すご 
い / も う FM-7 な ん か 欲し く な い / XI に は 無限 
の 可能 性 が ある の だ 。 
児島 敬 史 (2!) 福 岡 県 
来 月 号 あ た り で 。 またもや, 超 ・ 超 高速 ペイ 
ント ルー チン を 掲載 予定 で す 。 お 楽し み に 。 
多 私 の 壮大 な 計画 に つい て 少々 。 毎 月 Oh /MZ を 買 
うだ け で , あと は 貯金 し まく り ま す 。 す る と , 来 
年 の 受験 まで に な ん と の 万 円 も 貯まり ます 。 そ こ 
に お 年 玉 を 加え る と , な ん と 〇 万 円 に な り ま す 。 
その お 人 金 に , 大 学 に 入っ た と き の 入 学 祝い を 加え 
X, カラ ー モ ニタ と 拡張 /O0 ポ ー ト と ライ ト ベ ペン を 
買う の で し た 。 終 わり 。 
石塚 成 宏 (17) 兵 庫 県 
も し 大 学 に 入れ な く て 入学 捉 が も ら え な か っ 
た ら 何 が 減る の か な ? まあ 。 そ ん な こと の 
な いよ う , 娯楽 投資 は Oh MZ の み に し て 精 
進 し よう ね 。 
ショー ト プ ロ グラ ム は いい 企画 で すね 。 こ れ か 
ら も た くさ ん 載せ て くだ さい 。 
椎名 英喜 (19) 千 葉 県 
ショ ー ト プロ グラ ム 大 募集 中 で す 。 誰 に で も 
1 本 は 隠さ きれ た 名 作 が ある ん じゃ な いか な 。 
ぜひ 投稿 し て ね 。 
私 は あら ゆる パソ コン 雑誌 を 買っ て 読ん で いま 
す が , 今 だ に XID を パソ コン と し て で は な く , た 
だ の TV と し か 使用 で き な い アホ で す 。 も し プレ ゼ 
ント が 当っ た ら , LOAD ぐ らい は で きる よう に な り 
た い の で す 。BASIC は わか らん // マシ ン 語 は 簡単 
そう な の で や る 気 が 起 こら ん / 
岩城 史 如 (20) 北 海道 
いや あ , その 簡単 そう な マシ ン 語 に キミ が 熱 
中 する の も 間近 いか な ? 
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を XIC を 買っ て 2 カ月 。 早 く 使 いこ な せる よう に な 
Ю7:—\м\„ $, ХІССЕНЕЗ-ОЕ vy FE EMIT 
う と , 日 夜 頑張 っ て いま す 。 
安田 哲 幸 (25) 香 川 県 
それ は 簡単 で す 。X1 を テレ ビ に し て , ペスト 
テン に チャ ン ネ ル を 合わ せ て ……。 ご めん な 
зі. 


を MZ-700 を 買っ て 約 | Ж. Hu-BASIC £ S-BASICO) 
使い 分 け (コマ ンド の 違い ) を ほぼ マス ター し , 
父親 の 仕事 の プロ グラ ム を 作っ て や り , シス テム ` 
開発 費 を し っ か り い た だ いた 僕 で す ( 父 は 国鉄 で 
す )。 松尾 善良 (2|) 北 海道 
赤字 続き の 国鉄 と 聞き ます が ,。 い くら も 5 もらっ 
た の か な 。Oh/MZ の 稿 料 よ り は いい の か な 。 


*MZ-5511 (RAM256K) + WEROM キマ ウス + 漢 
字 CP/M で 27 万 円 (多少 応談 ) 〒 ま だ は TEL で て で 。 
〒969-04 福島 県 岩瀬 郡 鏡石 町 大 字 久 来 石 字 小栗 
山 476 熊谷 光博 容 024862 一 6605 

*MZ-2000+ G-RAM1,2,3+ У 7 F + 2 2 —BASIC 
+ 書 箱 + マ ニュ アル 箱 を , 8 万 5 千 円 一 10 万 円 で 。 
また 14 型 モニ タ 1D09 を 6 万 9 千 円 で ハガキ を 待つ 。 
T386 長野 県 上 田 市 常盤 城 6-4-5 市 瀬 常 在 

*MZ-80B-- G-RAM1,2+ MZ-1P07 + ITEM disk 80 
B+F-DOS キ ソフ ト 多 数 。 す べ て 取 説 ケース 有 。 
20 万 円 (相談 に 応 ず )。〒468 名 古屋 市 天白 区 御前 
場 町 127-8 日 比 野 泰彦 


*PC-1401# 1 万 円 で 。CE-124 付 で 千 円 追加 。 ま ず 
lU T466 名 古屋 市 昭和 区 福江 1- 5 -18 
村田 浩 義 

文 シ ャ ー プ の ドッ ト プ リ ンタ MZ-80PK5 を 譲っ て 〈 
だ さい 。 イ ンタ フェ イス ユニ ッ ト (КЕН) が あ 
れ ば 尚 良い の で す が 。 連 絡 て だ さい 。 プ リン タ だ 
け で も 結構 で す 。〒344 埼玉 県 春日 部 市 藤塚 2117 
-442 米田 雅雄 


kM, М2-731+ 7 7 bh. HH, PC-6001MKII, 
往復 ハガキ で 連絡 し て くだ さい 。 Т716-13 岡山 
県 高梁 市 巨 瀬 町 159-3 石川 健治 

ki, MZ-2200- 2 2 -СЕТ+ レコ ー ダ キソ フト 


@Puzzle BOX3 の 答 6 本 
編集 室 の みな さん , この アン ケー ト を 読み 終わ っ 
た ら , まこ と に ご 迷惑 で て しょうが, Puzzle BOX の 
係 ま で わた し て くだ さい (これ で 一 石 二 鳥 )。 
松本 、 隆 (I6) 鹿 児島 県 
あの な ー キ ミ 。 それ じゃ , 40 円 使っ て パズル 
係 に ハガキ 出し た 人 に 悪い ん じゃ な い ? 


*MZ-731+ ¥ = a 7 v+ Hu3g E U'S-BASIC+ 7Y 
ンタ 用 紙 3 巻 キ オイ ンク + キ ゲー ムツ ソフ ト 1 本 を 6 万 
円 。S 社 12' グリ ー ン CRT を 2 万 円 で 。 必 ず ハ ガキ 
To 2237 横須賀 市 湘南 鷹取 1-6-8 HZ 

*PC-1500-- CE150+4KRAM+ カナ テー プ + ソ フト 
テー プ (2 本 ) 関 連 書籍 6 冊 を 4 万 5 千 円 で 。 往 復 
ハガキ で 。〒120 ЖЕ УДЯТЧЕНСЖ2-15-1-1 
102 高橋 美和 子 

大 MZ-2200 用 キー ボー ドカ バー を 2 千 円 で 。 ま だ 新 
品 で す 。 往 復 ハ ガキ 待つ 。〒581 大 阪 府 八尾 市 東 
町 1-36-7 園田 秀章 


*M2-2000H1320K RAM ボー ド РІО - 3034(1 -07 
ー タ 機器 ) を 4 万 円 で 譲っ て くだ さい 。 ま ず は 往 
復 ハ ガキ で 。〒191 東京 都 日 野市 西平 山 2-8-53 
石原 克己 

*PCG-700--NEW PCG-AID 十 取 扱い 説明 書士 etc. 
まとも に 動く も の 1 万 5 FIT. 多少 相談 の 余地 
あり 。 往復 ハガキ 待っ て tT. T963 福島 県 郡山 
市 愛 容 町 6-8-302 橋本 覧 


27k, 貴方, X1 ま た は 13 万 円 で 。 ハガキ 待っ て ま 
T. T368 埼玉 県 秩父 市 大 畑 町 5-4 茂木 義 己 
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ж “VIVA ХІ クラ ブ " 設 立 。 日 本 全国 
に X1 の ワ を 作り まし ょ う 。X1 は 最高 
の 機種 で す が , 近く で ユー ザー を 探 
せま せん 。 友 だ ち を だ た (さん 作り た 
いと 思い ます 。〒365 埼玉 県 鴻巣 市 
本 町 3-12-7 堀内 慎一 

太 "X1 エ ユエ ユーザーズ クラ プ *" は ソフ ト ハ 
ハー ド の 情報 を 中 心 に , 月 1 度 の 会 
誌 を 発行 / 詳し く は 60 円 切手 同封 
の 上 , 〒805 北九州 市 八幡 東 区 日 ノ 出 1-17- 9 荒 
武 優 ま で 。 マ シン 語 研究 も し ます 。 入っ て 損 は な 
いよ 

友 ガンコ に も 固 持 し 続け る 全 世 界 の MZ-700 オ ー ナ ー 
の 皆さん 。 情報 交換 し まし ょ う 。 ハ ガキ また だ は T 
EL で / 1240 岩手 県 北上 市 大 提 南 3- 4 - 5-43 
岩渕 新 一 容 0197 一 67 一 3039 

去 MZ-700 ゲ ー ム クラ プ の 会 員 募集 中 / 往復 ハガキ 
で 連絡 し て くだ きい 。〒567 大 阪 府 茨木 市 太田 3 
-11-1 宮本 孝之 
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MS-DOS、 良 質 の 日 本 語 ワ ー プ ロ ( こ の 文 も PC-5000 で いき な すり 
打っ て いる 。 Оһ!М2 MAHERE. ) Kd. Hv 7. GW-B 
ASIC が あり 9、 他 に 何 が 要 る の か と 抵 ら れ そ うだ が 、 こ の 潜 い ハー ド を 何と 


か 1 20 旬 使い た い の だ 。 し か し 私 に は 時 間 が 無い 。 РС-50000,.-Е 
を 調べ て いる 入 は ぜ り OhY MZ に 発 ま し て くだ きい 。 


岡田 好 一 (25) 大 阪 府 


16bit 
Personal C 
Magazine 


お ブリ ルル リル ンス 


16 ビ ピッ トバ パソ コン の ハー ド お よび ソフ ト の 総合 活用 を わか りや すく 紹介 する 実用 情報 誌 、 登 場 。 


創刊 0 号 の 主 な 内 容 


特別 企画 
各社 の 16 ピ ビッ ト 主 カマ シン 総覧 | 創刊 0 号 は 6 月 発行 予定 
Epsom 予価 480 円 (隔月 刊 ) 


男 マ ル チ プ ラン に よる 経営 シミ ミュ レ ーション 520222022 
ШИЕ 7 16Ey FEF4V2 n] Bë PE 


ライ プラ ザー 本 誌 は 当 出版 部 発行 の 季刊 「 ザ ・ ソ フト バン ク 」 が 誌 名 、 体 
DoS 2 > B H. паасоб Кат: 77H 
B° z X i Z 2 PFA MERRE ГЕТЕ ТЕГІ ТІЗГІНІ; 
画 16 ビ ピット 用 ソフ ト の 4 ォ ペ レー ティ ング レポ ー ト озялексиатиак ива ESAE 前 誌 の 

; 5 3 ご 愛読 に 心から 感謝 し ます 。 ま た 、 今後 も 新 雑 誌 へ の 倍 旧 の ご 
Ш. yh (16 ビ ッ ト ベ スト ゲー ム 集 ) 愛 有 願 を お 願い 申し 上 げ ま す 。 


一 新作 ソフ トラ イブ ラリ ー 
日 本 ソフ トバ ンク 出版 部 発行 / 容 03(261)4095 


今世紀 最大 の 名 作 「 ス チュ ワー デス 物語 」 も 終わ っ て し まい 
編集 室 も 話題 に し ぼ し い 毎 日 で す が , これ で よう や 〈 落 ち つ いた 
春の 日 々 が 送れ る と いう も の で す 。 し か し ここ で また みな さん に 
は , ボー ッ と し た 頭 を 混乱 さき せる た め に も 今月 の パズル に 挑戦 し 
て も らい た だ いと 思い ます 。 


暖か く な っ て きま し た ね ぇ えと ば か り 同 志 を 集め (本 当 は 季節 を 
問わ な い の だ が ) 出かけ る こと に し まし た 。 私 (TË L U ++) と 
МЖ, Кӛл, S さ ん の 4 人 で も ちろ ん CAKE を 食べ に 行っ た の 
で す 。 4 人 の オー ダー 品 は 下 に 示す と お り で す が , お 店 の ウエ イト 
レス る ん は , PUZZLE BOX の 問題 に な る よう に と いっ て , МО 
よう に 間違っ た 置き 方 を し た の で す 


オレ ンジ ジュ ー ス 0.J. 
チー ズ ケ ー キ 

アイ ステ ィ ー 
ZENS 


バナ ナジ ュー ス 
レモ ン パ バ パイ 

アイ スミ ルク 
スト ロペ ベ リー バイ SP. 


そこ で 4 人 は , ジュ ー ス と ケー キ を 自分 の 位置 に 動か る さ なく て 
は いけ ませ ん 。 動か し 方 の ルー ル は ,。① 図 の よう な マス 目 を 作り , 
と な り の マス が あい て いる と き に は , そこ へ 動か すこ と が で き А, 
まっ すぐ に ひと つ だ け 飛 び こ ぇ て 動か みす こと が で きる 。③ テ ー 
ブル の 内 側 の 部 分 は 回 転 可能 で 。 1 ステ ッ プ は 90 度 と する 。- 
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以上 の 方 法 で , 正しい 位置 に 動か みす に は 最低 何 ス テッ プ 必 要 で _ 
し ょ うか 。 自 分 の 位置 に あれ ば , ジュ ー ス と ケー キ の 順番 は 関係 
あり ませ ん 。 た だ し 座席 を 変え る の は ダメ 。 


PUZZLE BOX 3 の 正解 


Ж 2 枚 

まず 一 般 的 に 考え て , 問題 の アミ ダビ ピー ス の それ ぞ れ の ピン に 
左端 か ら 0 一 6 の ピン 番号 を 付け ます 。 そ れ ぞ れ の ピン か ら 行 先 
を た どる と 。, 

0-4, 1-5, 2-6, 3-0, 4-21, 5-2, 6 一 3 一 一 (1 ) 

と な っ て お り , プラ ッ ク ボ ックス の ⑳ か ら ⑦ に 行く た め に は , 
0-6 

=(0—4) + (4—1) + (155) + (5—2) + (2—6) 
の 5 枚 の ピー ス が いる こと に な 
98575 

し か し ここ で て, 意地 悪 な “あー 
み だ ー《 じ ” で ある か ら に は , 
も っ と 少な (て 済む いや らし い 
方 法 が ある の で す 。 なぜ な ら , 
アミ ダビ ピース は , 左右 反転 , 上 下 
反転 , 水平 回 転 に よっ て 4 FED 
タイ プ の ピー ス と な る の で す 。 
この 場合 , 原形 の P1 と P4 は 同様 
に (1 ) の 作用 が あり , 反転 し た 
P2, Ра 

0->3, 1->4, 2—5, 3—6, 4—0, 
1, 622 — (2) 
の 作用 が ある 。 よっ て P2 あ る い 
は P4 を 使用 すれ ば , (2) よ り 
0-6 

->(0->3) + (3—6) 
の 2 枚 で で きる わけ な の で す 。 
ご めん な さる 一 い 。 
正解 者 
(愛知 県 ) 宇 野 高 彦 (岩手 県) 湯澤 健一 (佐賀 県 ) 村 本 一 (埼玉 
県 ) 川 端 宏治 様 ほ か 6 名 の 方 に 記念 品 を 送ら せ て いた だ きま す 。 


0123456 


0123456 


P4 
0123456 


0123456 


P.S. と ころ で *MZ-5500 プ ラ モ デ ル ” っ て ほん と 一 に ある ん 
で すか ?…… あ っ た ら ほ し い ……。 
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11 月 号 パラ レル 1!/O ボ ー ド の 製作 
P.60 図 2 の 回 路 図 中 に 訂正 が あり まし た 。 


4 月 号 特集 日 本 語 ワ ー ド プロ セッ サ 


P.43 中 段 12 行 目 

MZ-5500 の JWP の 価格 が 85,000 円 と な っ て いま す が , 89 
800 円 (辞書 ROM ポー ド 40,000 円 キオ ソフ ト 49,800 円 ) の 誤 
JTF. お 詫び し て 訂正 いた し ます 。 


4 月 号 WORD WRITER 
P.82 リス ト 中 , 以下 の 行 を 訂正 し ます 。 


3 月 号 


P.56 
660 
670 
680 
690 
700 
710 
720 
730 
740 


電子 オル ガン 
リス ト 660 一 760 行 を 以下 の よう に 訂正 し ます 。 
*ーーーFR TNTーーー 


PRINTE 1,71" 

РБКІМТІІ.71"  ---------17-700 
PRINTE1,71" 

FOR 1-1 TO ó 

PRINT" IEE ENNEN)! 
PRINTI 1, 71" ЕЖХЖЕЖЕК EOERA EGEREN 
PRINT" j IPO "ТЕР И е ӘЛЕ 
PRINT" JA IZ IX IC IV IB IN IM [5 1. 171? 
750 PRINT" 

750 PRINT" 


3 月 号 パソ コン 千 夜 一 夜 
P.82 右 段 リス ト 
2070 行 の 最後 に 2120 を 追加 


3 月 号 PIRATE SHIP 

P.106 リス ト 中 
2320 行 の 最後 、 GOSUB50 を GOSUB500 
2440 行 の 最後 、 GOSUB50 を GOSUB500 


4 月 号 キュ ー プ プロ グ ブラム 
P.118 リス ト 130 行 と 150 行 を 以下 の よう に 訂正 し ます 。 


150 COLOR7:CURSOR3;.21:PRINT"WHAT DO YOU DO ?"; 
150 CURSORS,.23:PRINT"WHICH DO YOU MOVE ?"; 


<š 


1290 LOCATE 32,16:PRINT" — Х— ВАЖЕ: ЕХЕ: ISIS" 
1300 LOCATE 32, 20:PRINT" — Ү— ВЕ: | EEEX | MZZ — —3À" 
1570 Х1=(1+АВ5 (X+PX~1) MOD 6) ¥ (АФ=СНКФ (19) ) + ( (Х+РХ) MOD 6-6) ж (А%=СНЕ% (20) )+(А%="@ 


")-(ASz"E') :Y1-(A$-"Ri") - cas") 


SHARP MZ SOFTWARE INFOMATIO 


(シャ ー プ 株 式 会 社 MZ ソ フト ウェ アイ ン フ ォ メ ーション No11 よ り 掲 載 ) 


@MZ-80B BASIC 不 具合 い 修正 方 法 の 件 @ 

(q) 

①SB- 6520 に お いて , SAVE/T, VERIFY 時, SHIFT BREAK C 
メモ リツ の 内 容 が 消え る 。 また, MZ- 80P4 接 続 時 , 136 桁 以上 の 
TAB 設 定 に 不具 合い が 判明 。 

②MZ-6620 に お いて , MZ-80P4 接 続 時 、136 桁 以上 の TAB 設 定 , お 
よび 指数 計算 に 不具 合い が 判明 。 


(DSE—4622o AUTO RUN PROGRAM 


10 
20 
зо 
40 
so 
60 
70 
во 
90 
100 
110 
200 
210 
220 REM 

300 REM MZ-8OBP4 ТАВ シュ ウ セ イィ 

310 POKE $534E,$40:POKE %5552,%АО 
320 REM 

400 МЕМ 

410 END 


DEF 
DEF 
DEF 
DEF 
DEF 
DEF 
DEF 


KEY( 1)=RUN 3 
KEY( 2) =LIST+ 
KEY( 3) =СОМЅО Е 
KEY 4) =CONT+ 
KEY( 5) =AUTO+ 

KEY 6) =СНЕ%‹ 
KEY(7) =DIR FD13 
DEF KEY(8)=DIR FDZ3 
DEF KEY(9)=DIR ユ 

DEF KEY(10)-LOAD 3 
REM 

REM VERIFY,SAVE シュ ウ セ イ 
POKE %4Ғ5С,%11:РОКЕ $4F5D, $51 


〔 修 正方 法 〕 
AUTO RUN に よる POKE 文 修正 の 以下 の プロ グラ ム に より , ЁТ 
正 し て くだ さい 。 
0 SE 6620 AUTO RUN PROGRAM 


10 
20 
зо 
40 
5o 
60 
70 
8o 
90 
100 
110 
120 
200 
210 
220 


DEF 
DEF 
DEF 
DEF 
DEF 
DEF 
DEF 


KEY(1)=RUN 3 
KEY(2)=LIST3 

KEY (3) CONSOLE 

KEY ( 4) «СОМТЭ 
KEY( 5) »AUTO3 

KEY (6) =CHRS( 

KEYC7) DIR FD13 

DEF KEY( ヨ )=DIR ҒО22 

DEF KEY(9)-DIR3 

DEF КЕҮ‹ 10) = ОАр 3 

КЕМ 

КЕМ 

КЕМ М2-ВОВР4 ТАВ シュ つや セイ 
POKE $5049,$940:POKE $50AD, $A0 
REM 

REM 

REM ул? ケイ サー 77° 74 シュ ウ セ イ 
POKE $373E,$CD 

POKE %575Ғ,%5А 

POKE $3740, $SB 

POKE %5741,%00 

FOR 1=25554 ТО 23363 
READ А:РОКЕ І,А:МЕХТ I 
DATA 197,205,194,46,195,62,52,205,126,201 
NEW 

END 
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84.6985 5 月 18 日 ( 金 ) 発 売 
グラフィック ツー ル 
@C コ ン パ イラ 人 入門 


投稿 を お 待ち し て いま す 


小 誌 で は ① テ ー マ 別 、② シ ョ ー ト 、③ を その 他 の 3 つ に 分 け て 、 皆 さん か ら の 投稿 を 
募集 し て いま す が 、 今 回 は テー マ 別 は お 休み で す 。②③ で ご 応募 くだ さい 。 掲 載 に 当 
た っ て は 、 多 少 修正 きせ て いた だ く こ と が あり ます の で ご 耳 承 く だ きい 。 な お 、 投 稿 
作品 の 中 か ら 特 に 優秀 な も の 1 点 に 「 月 間 特 別 賞 」 ほ と し て 、 原 入 料 と は 別に 記念 品 を 
差し 上 げ ま す 。 今回 の 賞品 は ソニ ー の 新型 ウォ ー ク マン (WM-20) で す 。 

また 、 東 京 近郊 に お 住ま い の 、 ゲ ー ム に 強く 、THE SOFTOUCH の テス ト ・ ラ ン を 
手伝っ て いた だ ける 18 才 以上 の 方 を 募集 し ます 。 次 の 要領 で む お 申し 込み くだ きい 。 

① 自 己 紹介 文 (400 字 程度 ) ② マ イ ュ ン 歴 ③ お 持ち の マシ ン と 周辺 機器 ④ 推 薦 す る ゲ 
ー ム ソフ ト 名 と その 理由 ⑤ 住 所 、 勤 務 先 、 学 校 名 と 連絡 電話 番号 を 、 封 書 に し て 、 ОМ 
MZ 編 集 室 「 テ スト ・ ラ ン 」 係 に お 送り くだ さい 。 な お 、 お 電話 で の お 問い 合わ せ は お 
断り いた し ます 。 


定期 購読 の お 知ら せ 

定期 購読 の 申し 込み や お 受け し て いま す 。 本誌 が 手 に 入り に くい 地区 に お 住ま い の 
方 、 毎 月 購読 し て いた だ いて いる 方 、 入 手 確 実 な 定期 購読 を お 勧め ゆ し ます 。 詳 しく は 
本 誌 と じ 込 み の 振替 用 紙 を ご 覧 くだ さい 。 
バッ ク ナ ン バー 在庫 状況 782.8, 10, 11, 12 83.8, 9、10、12 月 以降 の 在庫 が ご ざい ま 
す 。 お 問い 合わ せ は 、 出 版 営業 (03-261-4095) 宛 お 願い し ます 。 な お 、 バ パック ナン バー 
常備 店 は 143 ペー ジ に 掲載 し て あり ます 。 
海外 送付 ご 希望 の 方 へ 

本 誌 の 海外 発送 代理 店 、 日 本 IPS (株 ) に お 申し 込み くだ さい 。 な お 、 購 読 料金 は 郵 
送 方 法 、 地 域 に よっ て 異な り ま す の で 、 下 記 宛 必ず お 問い 合わ せく だ さい 。 

日 本 IPS 株 式 会 社 T101 東京 都 千代 田 区 神田 小川 町 3-5 容 03-291-2632( 直 ) 


スガ ヤ 無 線 商会 

スト ラッ ト フ ォ ー ド コン ピュ ー タ ー セ ンタ ー…8・9 
アマ ノ 電 器 サ ービス セン ター ……… 
ウス 吐 パ ソコ ン セ ンタ ー …………… 


Ш 1984 5 В | 日 発行 定価 480 円 一 発行 人 Ж 正義 ШЕЖЛ 田 針 洋 治郎 
ШЕЛЛ (株 ) 日 本 ソフ トバ ンク 
画 出 版 部 7102 東京 都 千 代田 区 四 番 町 2-| 容 03(26|)4995 FAX 03(262)8397 
Wc 社 十 |02 東 京都 千代 田 区 九段 南 2-3-!4 靖国 九段 南 ビ ル 容 03(263)3690⑯ 
TELEX 東京 232-4614 JSBTY FAX 03(263)3660 
画 大 阪 支店 T542 大 阪 市 南 区 難波 千日前 5-19 河原 セン ター ビル 3F 
® 06(644)019149 FAX 06(644)0160 
ШЕНІ 凸版 印刷 株 式 会 社 
©1984 JAPAN SOFT BANK 雑誌 02179-5 本誌 か ら の 無断 転載 を 禁じ ます 。 
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活 の 始ま る 人 、 職 業 人 た な られ る 人 、 新 し い 生 活 の 始ま 
る 人 、 も 多い と 思う 。 キ ー ボ ー ド が 嫌い な 人 も 、 こ れ を 
機会 に 、 練 習 を 始め て みて は どう だ ろう か 。 も ちろ ん 、 
それ 以上 出来 れ ば 言う こと な し 。 (H) 
p 某 大 学 の 研究 室 の マイ コン に 、「 メ ルコ ム ご っ こ 」 な る 
ソフ ト が 入っ て お り ま よし た 。 内容 は その 名 の 通り 、 メ ル 
コム と いう 大 型 計算 機 を シュ ミレ ー ト する も の で 、 実 際 
に 、FLAG や EDIT が 可能 で す 。 私 も 、BASIC で 、CP/M 
ご っ こ を 作っ て し まい まし た 。 根 暗 ク (6). 
b 新入 社員 の 入社 に と も な い 、 編 集 室 内 の 大 移動 が 行 な 
われ まし た 。 そ の 際 、 ね ずみ (MZ-5500 の マウ ス ) が 行方 不 
明 に な っ て し まっ ただ の で す 。 そこで 毎晩 ね ずみ 取り を し 
か け て お いた 所 、 先 日 みごと に ワナ に か か り ま し た 。 現 在 
MZ-5500 に つない で 逃げ な いよ うに し て あり ます 。(S) 
アドベンチャー ゲー ム の 紹介 記事 を 安 請 け 合 いし た と 
きか ら 私 の 不幸 は 始ま っ た 。 原稿 の 締切 り は 迫っ て くる 
の に 謎 は 解け な い 。 こ の 苦し み を 丸 5 日 間 も 続 け て し ま 
әй, WiDoNicOoLócv4arzOBNIH cus 
次 は 思い 出し た だ け で も ゾッと する 。 (KO) 
BYTE の 最新 号 が や っ と 届い た 。 ひ も じい 生活 で ある 
私 は sea mail の 一 ヶ月 遅れ 。 つ まり 2 月 号 ど ある が こ 
の 特集 "Apple's Macintosh” に は 驚い た 。68000CPU、3.5 
イン チマ イク ロフ ロッ ピー、 マ ウス 、 ウ ィ ン ド 必 、etc 。 
話 に よる と JWP を 今秋 サポ ー ト する らし い 。 (GTG) 
私 は バッ グ を 左肩 に 掛け て 歩く の を 常 と し て いる の だ 
が 、 先 日 な に げ な く 右 肩 に 掛け て みた 。 する と 。。 あな 、 
黄 し や 、 バ ラン ス が 狂っ て まっ つぐ 歩け な い の で ある 。 
以前 か ら 猫背 だ っ た か ら 、 こ れ で 前 後 左右 に 背 朋 が ま が 
っ た こと に な る 。 私 の 体 は どう な る の だ ろう が ⑦ (T) 
ぁ 梅 が 咲く と 梅 見 で 一 杯 、 桜 が 満開 に な る と 花見 で 一 枕 。 
知り 合い 筋 が や れ 入学 だ 、 合 格 だ と お 祝い で 一 杯 と 、 い 
よい よめ で た だ い 季 節 に な り ま し た 。 5 月 に な れ ば 鯉 も お 
いし く な る し 、 真 に ハル ラン マン で あり ます 。 い や あ 、 
実に 楽し い ぃ 今日 この ご ろだ ぁ 。 ま いっ た 、 ま いっ た 。 (R) 
今月 は まる に アド ベン チャ ー シ ン ドロ ー ム で あっ た 。 
残念 な が ら 紹介 し きれ な か っ た も の も ある が 、 正 直 に 言 
うと 、 ペ ベイ ント の トトロ さがわ ざわ いし た も の が 多い 。 こ 
れ ら の 作品 に は 「 私 は 、 ド ジ で マヌ ケ で ノロ マ な カメ で 
す 。」 と 反省 し 、 努 力 し て も らい た い 。 ジャ ンプ / (Т) 
もう 3 月 も 未だ と いう の に 寒い 日 が 続き 、 春 は どこ か 
ら 来 る の か な ? な ど と 思い つつ 歩い て いた ら 、 一 匹 の 
巨大 な カエ ル が 私 の 眼 に 飛び こん で きた 。 あ まり に 突然 
に 春 が 来 た の で 、 思 わ ず 飛 よび の いて し まっ た 。 こ れ で ま 
た 確実 に 1 m は 春 が 遠く な っ た … か な 。 (K) 
絵夢 絶 登 玉手 箱 の 連載 が し ば らく 和 中断 し て 皆様 を 不安 
が ら せ て いま す が 、 じ つ は 編集 部 の 特注 で 筆者 の 有田 隆 
也 君 、 友 人 の Itti 君 と 協力 し て 、XI の 解析 に の め り こ ん 
で いる の で す 。 来 月 号 あ た りか ら は 第 一 線 に 復帰 する で 
し ょ う 。 も うし ば らく 待っ て ね 。 (ja) 
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1 5301 アセ ンプ ラ 
ョ = ニュー バー ジョ ン QC-10 II の 全容 
$75 4 月 2 日 発売 予定 


特集 :5550 用 パッ ケー ジ ソ フ ト 
e€77)4—7377n77LbÁ81 52357. 
@ 逆 ポー ラン ド 記 法 実 習 プ ログ ラム 
MS-DOS 用 スク リー ン エディ タ 

@ マク ロア セン プラ 

ケー スス タテ ディ 5550 導 入 オ フィ ス 
プロ グラ ム バイ オリ ズム 相性 率 ほか 


特集 : き み も 言語 博士 に な れる / 
CPM を 利用 し て みて は … 

@ グ ラフ ィ ッ クツ ー ル で お 絵かき を 

⑦ ぐ マッ ドド ライ ノル バー オリ ジ ナ ル 3D カ ー レ ー ス ) 

汎用 イン タフ ェ ー ス と PS.G. の 製作 

活用 し よう / パン ソ ピア ・ デ ー タ ボッ クス 

② ぐ パン ソン ピア 7 シン セ サ イ ザ だ / 


特集 :GMC グ ラフ ィ ッ クス 
ソニ ー・ グ ラフ ィ ッ クス エディ タタ Computer Graphics 
BASIC ノ ター トレ ルレ ・ グ ラフ ィ ッ クス に 挑戦 し よう 
「SMC グラ フィ ックス の 世界 , 
云 ニュ ー メ ディ ア と HiTBiT 
SMC-777 の 全容 /CP/M ガ イダ ンス / 日 本 語 ワ ー プ ロ 
コン ピュ ー タ ・ グ ラフ ィ ッ クス 最前 線 :JCGL 
— "SF 新 世 紀 ・ レ ンズ マン 」 


ena oos. ОП, /: シリ ー ズ 
特集 PD・ ざ ・ ゲ ー ム 
D アメ リカ ンド リー ミン グ APPLE,IBM PC, ATARI 
る 続 ・ 泉 の グラ フィ ッ ク コ ント ロー ラ 
る PC-8801MKII は こう か わっ た / 
$8086 ア セン プリ 言語 講座 (と じ 込み 付録 : オ ペコ ー ド 表 ) 
月 刊 に な っ た 特集 : 日 本 語 ワ ー ド プロ セッ サザ サ 徹底 研究 
ワー プロ ソフ ト 全 比較 / ソ フト 別 試用 感 
| I $ » OS-9 デ イス クエ ディ タ 
a と FM-7 を 解析 する 
レイト レー シン グ を 用 いた 3 次 元 CG 
Py「FM モ ニタ , 汎 用 ルー チン の 解説 
季刊 特集 : 即 戦 ア プリ ケー ショ ン 集 
li 学校 成績 処理 / 電 子 手帳 通貨 変換 土木 工事 の 見 策 
C = | m フ \ ン ド ヘ ルド 3D グ ラフ ィ ッ クス の 世界 
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季刊 
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ジャ ン ル 別 ゲ ー ム を カラ ー で 紹介 
ОТ y + スー パー シス テム 88 
480 円 15907670 

ユー ザ の 声 / 簡易 ワー プロ 
сн al と アド ベン チャ ゲー ム の 作り 方 
480F3 

テニ ス ・ バ ドミ ント ン 成 績 集計 
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| GRAPHS 
MZ-7000 シ リー ズ 1. 折 れ 線 ブラフ 4. 横 棒グラフ 
プロ ッ タ プリ ンタ 用 2.XーY ブ ロッ ト (散布 団 ) 5. 円 プラ フ 
カセ ッ ト 版 \12.000 3. 終 棒グラフ 
PERSONAL mebDIp.......... 


どなた に で も 簡単 に 
美しい グラ フ を 
作る こと が で きま す 


現代 の ビジ ネス で は 、 毎 日 多 潮 の デー タ を 効 
率 良 く 処理 し て 行く こと が 必要 で す 。 デ ー タ の 
速やか な 把握 、 判 断 の た め に は デー タ を グラ フ 
と し て 表わし 視覚 化す る の が 効率 的 で す 。 とこ 
ろ が 、 手 作業 に より グラ フ の 作成 を 行う に は 多 
‹ の 労力 と 時 間 を 要する た め 、 徒 来 は ご く 重要 
な デー タ の 処理 を 行う 場合 に の み グ ラフ 化 が 行 
われ で きま し た 。 

グラ フ 8 は 、 パ ー ソ ナル コン ピュ ー タ か ら の 
簡単 な 質問 に 答え 、 表 を 埋め ゆる よう な 簡単 な 操 
作 で デー タ を 入力 する だ け で 、 棒 グラ フ 、 折 れ 
線 グ ラフ な どの グラ フ が どなた に で も 簡単 に 、 
* 美 し く 、 そ し て 速やか に 作 し れる パッ ケー ジ ・ ソ 
フト ウェ ア で す 。 し か も 、 入 力 し た デー タ は 保 
存 し 、 後 で 再び 利用 する こと が で きま す の で 、 
同じ デー タ で 表示 形式 を 変 た た グラ フ を 作成 す 
る よう な こと も 簡単 に 行う こと が で きま す 。 


ин 


-— е; LMP 3E IG SG DA. 
J J жәе өне =“ 
Personal Medía (C) 


折れ 線 グ ラフ は デー タ の 大 きき を 縦 軸 に と り 、 


デー タ を 順番 に 結ん ビグ ラフ で す 。 こ の 折れ 線 
グラ フ は デー タ の 時 間 的 な 推移 を 見 る の に 適し 
て いま す 。 


X-Y2n»k |. | 


ante te кен 
Personal Media (С) 


(散布 図 ) 

メーY プ ブロット は 二 つ の デー タ の 大 きき を 継 
軸 と 横 軸 に と り 、 各 サン プル を 二 つ の デー タ の 
大 きる を 表わす 線 の 交叉 し た 位置 の 点 と し て 表 
わし た グラ フ で す 。 こ の XーY プ ロッ ト は 三 つ 
の 性 質問 の 関係 (相関 ) を 見 る の に 適し て いま 
+ 


т-. GRAPH 8 


veris file 


ж. 


Harte өн” > x 
Personal Media (C) 
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縦 棒 グラ フ は デー タ の 大 きき る を 縦 棒 の 長き で 
表わす グラ フ で す 。 こ の グラ フ は デー タ 間 の 大 
小関 係 を 比較 する の に 適し て いま す 。 ま た だ た 、 一 
本 の 棒 を いく つか の 成分 の 大 きき で 区 切っ だい 


*: わ ゆる 帯 ゲ ラフ も 作成 で きま す 。 こ の グラ ラフ は 


各 サ ンプ ル 内 の 構成 比率 を 表現 する の に 適し て 


いま す 。 
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横 棒 グラ フ 
横 棒グラフ は デー タ の 大 き さ を 横 棒 の 長き で 
表 ゎ あす グラ フ で す 。 こ の グラ フ は デー タ 間 の 大 
小関 係 を 比較 する の に 適し て いま す 。 ま た 、 一 
本 の 棒 を いく つか の 成分 の 大 きる で 区 切っ た い 
わ ゆ る 帯 グ ラフ も 作成 で きま す 。 こ の グラ フ は 
各 サ ンプ ル 内 の 構成 比率 を 表現 する の に 適し て 
いま す 。 


жш 
== 


res кән 
Personal Media (С) 


Personal Medía (C) 


円 グラ フ 

円 グラ フ は デー タ の 大 き さ を 扇形 の 広がり の 
大 きる と し て 表わし 、 全 体 で 一 つの 円 と な る よ 
うに し た グラ フ で す 。 こ の 円 グラ フ は ある 時 点 
で の 構成 比率 を 表示 する の に 適し て いま す 。 


バー ソナ ル メ ディ イア 株 式 会 社 T 東京 都 品川 区 西 五反田 8-1-11 Z (03) 490-8841 
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パー ソナ ル ・ コ ンピュータ の 
最新 技術 、 最 新 製品 を 詳し く 解説 


「BYTE」 の 精選 情報 を 翻訳 ・ 掲 載 し ます 
「BYTE」 の 記事 の 中 か ら 、 わ が 国 の パソ コン 界 に と っ て 重要 な 情 
報 を 茂 選 し 、 こ な れ だ た わか りや すい 文章 で 翻訳 ・ 掲 載 (「 日 経 バ イ 
ト 」 全 誌面 の 約 359%) す る と と も に 、 パ ー ソ ナル ・ コ ンピュータ 、 エ レク 
トロ ニク ス の 高度 な 知識 を 持つ 専門 記者 の 直接 取材 で 、 国 内 外 の 
最新 情報 を お 届け し まれ 

パソ コン の 最新 技術 を 詳し く 解 説 し ます 

「 技 術 的 な 解説 」「 体 系 だ っ た 情報 」「 パ ソコ ン 界 を 幅広 く カ バー 
する 情報 」 を 提供 。 パソ コン の 先進 的 な 使い 方 を 進め る 際 に 必要 
な 新 情報 た も あら ゆる 角度 か ら 深 《 掘 下げ て 解説 し ます 
最新 の ハー ド ソフ ト を 徹底 的 に 解剖 し ます 

国内 外 の ハー ドッ フト 、 周辺 機器 の 中 か ら 注 目 す べき 新 製 品 を 
取り あげ 、 独自 の 視点 か ら 徹 底 分 析 。 ハ ー ド の 回 路 設 計 手法 、 ソ 
フト の シス テム 設計 技法 、 を の 特徴 、 設 計 の 巧 押 ま で 踏込 ん で 解 
説 し ます 
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創刊 前 ・ 春 号 を 発行 
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特典 : い ま 購 読 を お 申込 み の 方 へ 、 
創刊 まで に 特別 編集 版 を 3 冊 無料 贈呈 。 
@ 信 刊 前 ・ 存 号 …4 月 23 昌 用 発行 念 創 刊 前 ・ 夏 号 …6 月 25 日 用 
発行 人 創刊 前 ・ 秋 号 …8 月 2 日 朋 発 行 

* 裏 面 で 創刊 前 ・ 春 号 の 詳し い 記事 内 容 を ご 紹介 し て いま す 。 
@10 月 1 日 創刊 @ 月刊 ( 毎 月 1 日 発行 ) 

ФА 変型 判 、 毎 号 約 200 頁 

@ 個 人 の 年 間 予 約 購読 ・ ご 自宅 郵送 制 

購読 料金 : いま 購読 を お 申込 み に な れ ば 、 特 別 編集 版 が 3 冊 
プラ ス さ きれ て 非常 に ぉ 得 で すれ 


X LEBER ODD een 6,0001] (11024950009) 
KENE (ЗӨН eene 12,000 (11:903331) 
発行 : 日 経 マ グロ ウ ヒ ル 社 
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郵便 は が 


パソ コン の 技術 情報 


Al TJ Вале 


購読 お や 申込み は いま す で / 
創刊 前 ・ 

春 、 夏 、 秋 号 の 
3 冊 を 無料 贈 星 


この 創刊 前 ・ 春 、 夏 、 秋 号 は 、 
創刊 まで に 購読 の お 申込 
み を いただい た 方 だ け の 
た め に 特別 に 発行 する も の 
で すい ます で お 申込 に な 5 
3 冊 と も お 読み くだ さい 。 


強力 な 情報 網 で 、 
最新 の パソ コン 技術 情報 を 提供 。 


「 晶 経 バ イト 」 を 発行 する 日 経 マ グロ ウ ヒ ル 社 は 、 日 本 経済 新聞 社 と 、 
世界 有数 の 情報 企業 、 米 国 マ グロ ウ ヒ ル 社 の 共同 出資 で 設立 る 
れ た だ た 、 技 術 情報 の 総合 出版 社 で す 「 日 経 バ イト 」 の 発行 に 当っ て 
は 、 日 経 マ ゲロ ウ ヒ ル 社 の 取材 網 を フル に 活用 する ほか い 、 日 本 経済 
新聞 社 、 米 国 マ グロ ウ ヒ ル 社 も 全面 協力 し ます 


【 購 読 料金 】 

ФІ (12908) RR ASIN uS € шка, iral iu ru айна Re I а E УЛЕА 6.000F3 
ӨЗІНШЕ (36%) 人 d' ajo uieis miu жэй! я канатты босар БЕ 12,000F3 
* 料 金 お 支払 い は 、 今 秋 創 刊 号 も お 届け し て か ら で 結 構 で す 。 
発行 : 日 経 マ グロウ ヒル 社 


T101 東京 都 千代 田 区 神田 小川 町 1-1 
読者 サー ビス ・ セ ンタ ー 容 (03)380-3157 
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【 創 刊 前 ・ 春 号 の 主 な 内 容 】 

【 特 集 】 マ ル チ ウ イン ドウ 

る ユー ザー・ イ ンタ ー フ ェ イ ス を 変革 する マル チ ウ イン ドウ 

@ Concurrent CP/M マ ル チ プ ログ ラミ ング / マ ル チ ウ イン ドウ OS 
コン ピュ ー タ と それ を 操作 する 人 間 と の イン ター フェ イス を 革命 的 に 
変え る 新 技術 が 、 パ ー ソ ナル ・ コ ンピュータ の 領域 に も 浸透 し 始め 
た 。 マ ル チ ウ イン ドウ と マウ ス を 特徴 と する 新しい ユー ザー・ イ ンタ ー 
フェ イス の 動向 と 技術 面 の 特色 を 探る 。 

一 般 解説 

人 @ バ パン コン 間 デ ー タ 通信 ソフ ト と 通信 プロ トコ ル 

@⑱ マ イク ロフ ロッ ピー VS コン パク ト ・ フ ロッ ピー・ デ ィ ス ク 

@32032、 モ ジュ ー ル 指向 の 32 ビ ッ ト cpu 

パー ソナ ル ・ コ ンピュータ 関連 の 技術 トピ ッ ク を 広範 囲 に 集め 、 開 
発 者 あみ るい は 記者 が 詳し く 解 説 。 

シス テム ・ レ ビュ ー 
@PC-100: マ ウス と ビッ トマ ッ プ と 日 本 語 処 理 

話題 の 新 製 品 を 対象 と し て 、 そ の 使用 感 、 仕 様 上 の 注目 点 や 問題 
点 な ど を 、 き さま ざま な 角度 か ら 評 価 。 

自作 講座 

@ADPCM 方 式 を 用 いた 明瞭 度 の 高い 音声 合成 ボー ド を 自作 する 
市 販 の 製品 に は 見 当たら な か っ た り 、 あ っ て も ぁ 人 性能 に 満足 びき な い 
コン ポー ネン ト を 、 安 価 で 簡単 に 入手 で きる 部 品 を 使っ て 自作 。 
byte ネ ットワーク : パソコン 分 野 の 新しい 出来 事 を いち 早く て レポー ト 。 
フォ ト ・ レ ビュ ー: 写 真 に よる 話題 の 新 製 品 解剖 。 

新 製品 : パ ソコ ン 関 連 の シス テム 、 周 辺 装置 、 ソ フト な ど を 紹介 。 
マイ クロ バイ ト : 最新 の ニュ ー ス を 一 目 で 理解 で きる 形 で 速報 。 
クラ ブ プ だ より 、 カ レン ダー…… ほか 
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(к 2 Ж) 


麻雀 狂 は 現在 も っ と も リア ル に シミ ュ レ ー ト さ 

れ た 麻雀 ゲー ム で す 

ゲー ム の 特長 

※ 麻 痢 に レベ ル 設 定 を 可能 に する こと に より 、 飽 る 
事 な ( プ レイ を 楽し め ま す 。 

※ 有 麻雀 ゲー ム が 「 わ か ら な い 」「 で き な い 」 と の ユー 
ザー に は 、 初 期 画面 の レベ ル 設 定時 に アマ チュ 
アレ ベル を 選択 し て 下さ い 。 ユ ー ザ ー が 切 牌 の 
判断 が 出来 無い 場合 、 コ ンピュータ の 判断 に 
より 、 切 牌 等 を 自動 的 に お な こない ます の で 、 初 級 
者 は 適切 な 切 牌 の 判断 が 可能 で す 。 

他 の レベ ル を 設定 し 、 ユ ー ザ ー が 思考 時 間 
内 に 切 牌 が 出来 な い 場合 、 コ ンピュータ に より 0 無 
差別 に 切 牌 が る れ ま す の で ユー ザー は 、 БОЯ 
な 判断 が 要求 きれ ます 。 (レベ ル ダ を 除く ) 

※ タイマー の 停止 も 可能 で す 。 

※ ゲ ー ム 進行 に よる 各 指 示 (リー チ 、 ポン 、 カ ン 、 
チー、 ロ ン 等 ) は 、 そ の つと 画面 左下 に 指示 され 
ます の で マニ ュ ア ル が 不要 で す 。 

※ 有 麻雀 狂 で は 、 他 の 麻雀 ゲー ム に は 無い 、 多く の 
画面 変化 が も りこ まれ て いま す の で 、 画 面 を ご ら 
ん いた だ くだ け で も 楽し いと 思い ます 。 ま た 画面 変 (Ж B) 豊 シ ャ ー プ /X-1 シ リー ズ 


マシ ン 語 が わか る 人 も わか ら な 
い 人 も 、 こ れ だ け は 準備 し た い 
で すね 。 


VINGMONITOR 


2--7Ұ6.000 


化 を する 事 に より 適度 な 思考 時 間 を 得 て い ます 。 @NEC PC-8801 シ リー ズ : 
※ こ の プロ グラ ム は 漢字 ROM を 必要 と 漢字 а БАБР ЕВО 


< 価 ж) @ カ セッ ト / #3800 


表示 を 可能 に し て いま す @5D ¥ 5800 シン 語 プ ログ ラム の 作製 が 可能 。 
※ リ ビー ト 機 能 …… 同じ 配 筐 に より ゲー ム が 可能 。 өСГ ¥ 6,800 * ` еш = £ > ッ セ 
※ リ プレ ィ 機 能 …… ゲ ー ム を 中 断 し 最初 か の ら ゲ ー ez re did gu A 

ム が 開始 され ます 。 ンプ ブラ が この 1 本 で 動作 し ま 


す の で 作業 効率 が 良い 。 
@ バ ッ ク ア ッ プ 機能 付 。 


明記 の 上 、 現 金 書 留 で ご 注文 下さ い 。( 送 料 無料 / ) 機 種 名 も お 忘れ な く 。 


COMPUTERS! ING T013 横手 市 八幡 石町 27 
COMMUNICATION МЕУ7 “%0182(33)4767 


※ 当 社 プ ログ ラム 等 の 質問 に 関し て の お 問 合 わせ は 木曜 日 を 除く pml:00 一 pm6:00 迄 に お 願い し ます 。 


お 求め は 、 全 国有 名 マイ コン ショ ッ プ - シ ャ ー プ エン ジニ アリ ング 及び 日 本 ソフ トバ ンク を ご 利用 下さ い 。 
お 近く の お 店 で 、 手 に 入ら な い 人 は 、 プ ログ ラム 名 、 カ セッ ト 及 び デ ィ ス ク の 別 、 住 所 、 氏 名 、 電 話 番号 を 


@ バックアップ 機 能 は 個人 的 な 
使用 以外 は 使用 し な いで 下さ い 。 


お 申し 込み は 今 すぐ お 電話 で 03- ど 51- -9911^ 


— / デン ウイ ー グ 


4/18—5/18 


MZ-2000 (4E ¥ 218,000) +72 € +f U FIL 
ソン フト 5 本 (\15,000) 
三 合計 定価 \233.000 只 特価 \89,.800 
2]CZ-800C ( 本体 定価 \155.000) 十 C 乙 -800D(14" カ 
ラー ディ スプ レイ テレ ビ \113,000) 二 CZ-8GR( グ ラ 
フィ ッ ク RAM ¥ 32,000) 


三 合計 定価 \300,.000 只 特価 \169.800 
※ 台数 限定 品切れ の 際 は 御 容赦 下さ い 。 


um 


ビジ ネス gi 一 ダー 
ソフ ト 低 価格 大 系 を 実現 


е5. 貴方 の ほし い à c 
eA қ регла 
op RACED 


し て いま すか ? 
fam 
ト を 作っ て いる あな た は 
AIT YSE KEEN か か < 
ARB E ERATIER ‚ү 
制作 する スタ ッ フ を ニ ia 


あっ て い TX 
узт t 1002678 PR 


うぅ 通り に 作れ ま 
か る も の て す 


TOEI 


>x 
үа {казу тен ORS 


id 合 > 4 
各社 ・ 各 店 ・- RDF вила nic red 組み = わせ シリ ー ス 目玉 商品 
き し く は ZSP51ー -9966 CZ-801C 本 体 Y 119,800 
詳 y CI4VCI 14' パ ソコ ン TV フ ァ イ ン ピッ チ 2000 文 字 ¥ 93,000 
АХ ツク モ オ リ ジ ナ ル ソ フ ト テ ー ブ プ 版 3 本 \ 9,800 
Я D = JOY-X ジョ イス ティ ッ ク \ 2,800 
アク ティ プ ブタ イ 三 合計 定 
CZ-8OIC 標準 価格 Yil9.800 合計 定価 \z25x400 叶 特価 \159.800 
CZ-80ID 標準 価格 \99.800 CZ-80IC 本 体 Y 119,800 
4/21-30 ыер jet (マス クビ ピッ チ 0.45m) CZ-140DS 14" カ ラー ディ スプ レイ テレ ビ ¥ 89,800 
商品 品 先 渡し セー ツク モ オ リ ジ ナ ル ソ フ ト テ ー プ 版 3 本 \ 9,800 
= JOY-X ジョ イス ティ ッ ク \ 2,800 
w5/5-6 = € t= (it Ұ?2ғ,200өф 1 ¥ 169, 800 
CZ-801C жж ¥ 119,800 
w5/!3 


CZ-80ID 14" カ ラー ディ スプ レイ テレ ビ ¥ 99,800 
ツク モ オ リ ジ ナ ル ソ フ ト テ ー プ 版 3 本 ¥ 9,800 


АХ2/) 


JOY-X ジョ イス ティ ッ ク Y 2,800 

三 合計 定価 \232:290- mp 特価 お 問い 合わ せ 下 さい 

Graco MANET INN соо р У 128,000 

(з ソナ ルコ ンピュータ + キ ー ボ ー ド ) KEW CZ-802D 1455—51 スプ レイ テレ ビ ¥ 128,000 

14 型 カラ ー デ ィ ス プレ イ テ レ ビ JOY-X ジョ イス ティ ッ ク ¥ 2,800 

CZ-802D ЖАНАМ ¥ 128,000 DISK 版 ゲー ム ソ フ ト | 枚 ¥ 4,800 
(マス クビ ピッ チ 0.4m) 


= 合計 定価 \339-son 時 特価 お 問い 合わ せ 下さ い 


DN ユー 


e 
> 


eA セッ ト 
本 体 標準 価格 MZ-2200 本 体 ¥ 128,000 
¥ 128,000 IT02 デー ター レコ ー ダ ー Ж 19,800 
NH-I4DK 14" カ ラー モニ ター i 69,800 
カラ ー ケ ー プ ブル 1,800 
мейде" = 合計 定価 \zt9。400 wp НІ ЗҰ1 52, 800 | 
“ eB セッ ト 
Қаш М2-2200 жж ¥ 128,000 
2 ышаны IT02 デー ター レコ ー ダ ー \ 19,800 
vm" MB-27303 12'2000 文 字 カ ラ モ ニ ター Ұ 99,800 
クモ = анежутн оар 31 62,800 
L 2 ADRS — or - — 
ジル . Б кезити: | | だ か ら ウ ク モ で 買う 
f 。 その 場 て 打ち 合わ せ を し 、 ト `` zl -- 
ツ ト レー ト セ ンタ ー お 客 様 カー ト に 内 容 等 記入 致し ます bR ッ ツク モウ ルト ラ シ ス テム 
峰 て お 申し 込み に な っ た 場合 も お 客 様 カ ー ト を 記入 し 、 送 se 
= “ ә” % — // HELATOCARIHRIEO L. 74 YRUFRENL СТА. Амалы T будым һе 
? 申し 込み 合 Y2.000 を 同封 の 上 、 所 送 し て 下さ る よう お 願い м2 ia 
.. 致し ます 頭金 ナシ 月 々 3.0OO 円 クレ ジッ ト 
` - - ^ 5 А 低 金 利 ク レジ ッ ト 
マイ コ ン を 売り た い 人 、 買い た い 人 の 橋渡し 買い た い 人 Lied s a … 便 利 な クレ ジッ ト 60 回 まで OK/ 
貴方 が パソ コン を 売り た い ・ 買 いた いと 思っ た 時 、 ツ クモ トレ ー ト э пре Я 全 商品 保証 付 Р 
セン ター に お 問い 合わ せ 下 さい 当 セン ター て 動作 状態 が 完 動か ド を 承認 の 上 、 記 大: 擦 印 し て 項 を 送付 し て も らい ます … 製 品 は すべ て メー カー 保証 付 
整備 か を チェ ッ ク し 、 商 品 を 充分 査定 の 上 、 お 客 様 の 希望 価格 を | bi カテ О АА-А ые ғ суаты кабыр 
設定 し て ンク モト レード セン ター 中 古 品 リス ト に 登録 致し ます 系 、 御 連絡 致し ます その 時 に 商 ATEM 
ы. FS 品 を 当 セ ンタ ー に 送付 し て 下さ い ツク モト レー ト セ ンタ ー ツク モ 全店 に て 高額 下取り 買取 り OK ノ 
トレ ー ド セ ン ター 技術 スタ ッ フ が 動作 状態 等 査定 し 、 再 度 御 連 略し て 希望 価 
с EAT жг ت‎ 画 査 定 基準 格 を 設定 致し ます (この 場合 、 販 売価 格 の 変更 も 有り ます の HNIC (FLEET < ) 
(803-261-9977 | "Lm МАЙТ TERRES | нии 
о ッ ト ハ ーション Б в e ^ 
2 使用 年 月 s PARTER RAR U £ + スキ ッ プ クレ ジッ ト で 
ニュ ー セ ンタ ー 店 зик жа ани йе»), ШР Ката 大 今 、 お 申し 込み に な れ ば お 支払 い は 
кзн ` н қ д s : あな た の ご e Lm 
| 5 オリ ジ シナ ル ダ ン ボール 及び バッ キン 委託 者 の 条件 で 手数 料 ( 含 む 振り 込み 手数 料 ) を ャ ツクモ ラク ラク クレ 
| 803- 253-0986-7 の 有無 差し 引い た 金額 を すみ や か に 振り 込み 致し ます аата 


2-2 \ SSi MAEA TIO pais S aa. 九 十 九 電 機 株 Oh./ MZ f 
03(251)9911^ А ツ ワ モ 全 国 ワ レジ ッ ト OK/ 


e 現金 特 別 価格 て ンク モク レジ ッ ト が 利用 で きま す ft> ж 株 式 
ご 注文 の 際 は 、 ご ご 注文 に な り た い 商 品名 残金 の み に 金 利 が か か り ま す k. Z СЕ 
を 二 記 入 の 上 、 現 金 書留 に て お 願い 致 | @60 回 払い まで 出来 ます 但し 、! 回 の 支払 い 額 は 3,000 円 > x` $94 会 社 
し ます 20 万 円 以上 は 銀行 振込 み も 取り | @ その 場 て 、 お 持ち 帰り で きる クレ ジッ ト も あり ます 


扱っ て お り ま す お 問い 合わ せ 下 さい @eEH 鑑 、 身 分 証明 書 ( 免 許 証 な ど ) が 必要 で す 


ニュ ミー セン т\б! 東京 都 千代 田 区 外 神田 |-I6-10 7203(251)09 8 7 
cs Z 古屋 店 3F 5460 & HS eI AC 0 үй Баман 
> ーー ラン オセ ンタ ー ア メ 横 ヒル ( ) D 
富士 銀行 神田 支店 取扱 い トク レジ ッ ト カ ー ド : 日 本 信販 、JCB、DC、UC、VISA、MC、CF 5 号 店 TO 東京 都 千 代田 区 外 神 田 3-|-14 合 03(251)0531 2 
з; M S3 = E = авз = 7 号 店 TO 東京 都 千 代田 区 外 神 田 |-9-9 f103(253)4 1 9 9 
普通 а No894047 ( 尚 、 ク レジ ッ ト カ ー ド ご 使用 の 場合 は 店 頭 員 に ご 相談 くだ さい XO M 店 TOO 札 由 市 中 央 区 南 二条 西 3-15-! きっ し ん ビル BI ROI (241)2 299 
ヒ テ オセ ンタ ー 店 〒060 札幌 市 中 央 区 南 二条 西 4 と 井 ビ ピル BI!・IF ТЕ011(241)3999 
Шао. Ж С XU E LIBE. BRR E FERE THAR BENO. £ SD > t т=н жеаланажан:жзжан, MR AMA 
так 


札幌 店 (マイ コン ・ ビ デオ 店 ) は 第 3 木曜 日 
尚 、 商 品 の 詳し い 取 り 扱い 等 は 、 各 販売 店 まで お 問い 合わ せ 下さ い 
壇 セ ッ ト の 場合 は 梱包 送料 Y 2.000 を 加算 し て 下さ い 


(27-5500 シリ ー ズ 5'2phR 222) 日 本 語 ワ ー ド プロ セッ サ 
( PC- 98003JJ—Z' 8'-5'200-5'20/& » 
( PC- 88003-2" 5 208 ) 


1-535. 


( РС100:2/)-Я”  5'zohk » 


"428,000 


文節 変換 で 入力 効率 を 追求 。 
カナ ・ ロ ー マ 字 入力 に よる 文節 変換 方 式 を 採 
用 。 動 詞 の 活用 、 送 り が な 、 接 頭 語 、 接 尾 語 
その まま 入力 一 漢字 変換 。 だ か ら 、 ス ピー ディ / 
多彩 な 機能 も 、 メ ニュ ー 画 面 で ラク ラク 操作 。 
操作 メニ ュー が 、 い つも 画面 に 表示 され て いま す の 
で 、 文 書 作 成 、 編 集 、 管 理 、 印 刷 な どの 多様 な 機能 も 、 フ ァ 
ンク ショ ン キ ー で スム ー ズ に 、 簡 単に 操作 で きま す 
長文 作成 も 気 に な り ま せん 。 

一 頁 あ た り の 行 数 が 自由 で すか ら 、 頁 づけ を 気 に せ ず 、 長 文 
作成 が で きま す 


в. 
作 表 ・ 計 算 機 能 て 、 さ ら に 有効 活用 。 

カー ソル 移動 で 自由 に 肢 線 が 引け 、 作 表 も 思い の まま 。 さら に 、 四 則 演 算 、 四 捨 L 
五 入 な どの 計算 機能 を 備え て いま す の で 、 幅 広い 用 途 に 対応 で きま す ж" < 


Pt KEE g) fth (= EA RHEE ЖЕН ЕЕЕ ЖШ, БАНЫ. Еа 
SEDRE., 1-7 КЪА A— 14864. FH XA 


語 )、 外 字 登 録 機能 あり £ Ë 
м 


豊富 で 多彩 な 辞書 構成 。 ALI 
^ 


ユー カラ どう し で 文書 ディ スク の 互換 性 が あり ます 。 = 

ユー カラ ・ フ ァ ミ リー 内 で 、 文 書 ディ スク の サイ ズ ・ 密 度 が まっ た く 同 じ 場合 2 に 
換 性 が あり ます 。NEC の PO-8800 用 8 イン チ 日 本 語 ワ ー ド プロ セッ サ (PS88- I01I- / 

SF ) も 同様 で す 


حا ونا دا ا وا را 


ユー カラ は 、NEC 発 売 の ベス ト セ ラー 商品 、PC-8800 用 日 本 語 ワ ー ド プロ セッ サ 3 кале 
КЕЕ I-SF 〇 東海 クリ エイ ト ) と 同機 能 で すか ら 、 信 頼 性 は 実証 済み 。 対応 プリ ンタ も 豊富 で す 。 | 


+ に つい て の お 問合せ は 上 記 ま て お 気 帳 に と うそ 


sig Л) ! イト T 108 東京 都 港 区 芝 5-13-18 MTC ビ ル 6F 1103-456-4615 イン フォ メー ショ ン セ ンタ ー 
宮崎 営業 所 〒880 宮崎 市 高千穂 通 |-6-35 住 友 生 命 ヒル 7F 容 0985-29-1966 登用 )TELU3-45B-4B10 
Computer Technical Creation өз /7 


も より の 電話 へ 
お 申込 み 下 さい 。 


カラ ー グ ラフ ィ ッ ク 機 能 が 充実 、 
入門 か ら 実 務 ま で 


Y 126,000 
p 均等 払 \6.206 x 205]. ¥ 4,351 X30 回 


FM-7 く 簡易 言語 付 > …………… Y 126,000 
AB27303< カ ラー モニ タ > Y 99,800 
MB27501< デ ー タ レコ ー タ > -- Ұ12,800 


BPP RO заалаа ‚000 
GP250F< プ リン タ > ……・ , 800 
接続 ケー ブル …… ド ees ,000 


現金 特価 \286.000 合計 \337,400 
p 均等 払 \14.620 x 24[8] 3€ 9,851 x 36 回 


IMBF DD2 台 、 ワ ー プ ロ ソ フト (JWORD). 
漢字 HOM CP/M86、F-BASIC86 付 の 強 
カビ ジネス マシ ン 
FM-TIBSCK 4) --- 
現金 特価 \340.000 

№ 均等 払 \11.711X36 回 、\9.208 x 48 回 
FM-11BS( 本体 ) 7 ¥ 398,000 
MB27315(12252—CRT) ……\ 118,000 
定価 合計 \516 .000 


< 


^E fifi ¥ 398,000 


現金 特価 \442 .000 
p +273511, 15,224 ※36 回 、\11.971 ミ 48 回 


IMBFDDI 台 、 ワ ー プ ロ ソ フト (JWP-11)、 
漢字 HOM、0S-9 標 準 装備 の 未来 指向 マ 


°$ رسن 
FA-11AD2( 本 体 ) CK E У 298,000‏ 

現金 特価 \255 .000 
> 均等 払 \8.783 36E], Y 6,906  48[3] 


38$ 154m Y 420.000 
p # HY 9.467 x 36[8], т Y 30,000 x 6:31 
p 均等 払 \14.467 x 361 


p 153831, 9 231 х 36 回 


¥ 725,000 
№ 15511, ¥ 17,600 ~ 48[8] 


p 均等 払 \7.540X20 回 、\5.287 x 308 
ПЛОАЅҮЅ7) 95/5 oss 
à P 均等 払 \5.828 X 12 回 、\3.654 X20 回 
ワー プロ 本 体 (6 イン チ デ ィ ス フレ イ ) OZR screens ¥ 104,800 
プリ ンタ (感熱 式 ドッ ト 式 いす れ p 均等 払 \5.452 X20 回 、\3.823 x 308 
か こ 指 定 下 さい маво,ооо 


新 


eNEC 


PC-6601( TT, 
X 143,000 現金 特価 \125.000 
p 均等 払 \6.146X24 回 、\4.306x36 回 


PC6001mkII 


PC6001mkII < 本 体 > ………… -¥ 84,800 
PCDR321 < デー タレ コー ダ > : Y 19,800 
PC60A43< カ ラー ディ スプ レイ 〉 ・\68,500 
PC60AZ5 く < ディ スプ レイ 置台 〉 -Ұ5,500 
PC6022 < プリ ンタ > 
PO6094< ケ ー ブ ル > 

現金 特価 \188.000 F 225,900 
> 均等 払 \9.243X24 回 \6.476 x360 


ボケ コン ハン ド ヘ ルド 
@ カ シオ 
PB-700 < 本 体 > | 
FA10< プ リン タ > 
CM-1< マ イク ロカ セッ ト ) | 


合計 \94,800 


現金 特価 \75.000 


P 均等 払 \6.938X12 回 、\4.350X20 回 


@ シ ャ ー プ 


PC1501 < 本 体 > | 
CE150 カ ラー グラ フィ ッ ク フ リン タダ | 


p 均等 払 \5.336 X20 回 、\3.741X30 回 


る エプソン 


HC-20 
H20MC 
現金 特価 \130.000 


Y 138,600 


「 ビ ジネス set 
ビジ ネス set」 付 -. ¥ 25, 800 


入門 コー ス 3495 


FP-1100( 本 体 ) 定価 \128,.000 
FP-1004( カラ ー モ ニタ )…… 定 価 \98,.000 
FP-1082C( ケ ー フ ル ) … 定 価 \2,500 
FP- 1084CAC( ケ ー フ ル ) "3E (i Y 800 


ゲー ム ソ フ ト | 本 サー ビス 
定価 合計 \229.300 
38 & i858 ¥ 128. 000 
p +) + Y 6,293 x< 24151. Y 4,409 x 36 
FP-200( ハ ンド ヘル ド 本 体 ) ЖЕ Y 69,800 
ライ ブラ リー3 冊 定価 \5,300 
ゲー ム ソ フ ト 2 本 定価 \3,.600 
現金 超 特価 \54.800 定価 合計 \78.700 
均等 払 \5.069・12 回 


n 


回 


無料 配送 >= сън. 製品 先取 りゃ 込み 7 日 M9 て 届き さま る 。 


完全 保証 99507257755. 日 曜 配送 


共働き の 方 や 、 留 守 が ちの 万 
も お 気軽 に お 申込 み 下 さい 。 


頭金 な し зваро. お 支払 «287. 2>нат>с5. 


潟 0252-75-4175 


ІШ 台 0222-64-4 


名 古屋 052-452-3271 


&&t Y 114,600 
39 1% ¥ 92.000 


フタ バ 電 機 株 式 会 社 


т101 東京 都 千 代田 区 外 神 田 3-2-3 


| コレ クト コー ル ( 全 106) で お 申込 み 下 さい | 


福 
eNEC PC-8801AK II 


PC-8801AK II モデ ル |0( 本 体 の み ) 

¥ 168,000 現金 特価 \145.000 
р 均等 払 \4.994X36 回 、\3.927X48 回 
PC-8801AK II モデ ル 20(5FDDI 台 付 )…… 


¥ 225,000 現金 特価 \195.000 
均等 払 \6.717X36 回 、\5.281X48 回 
PC-8801AKII モ デル 30(5FDD2 人 台 付 ) 

\275,000 現金 特価 \235.000 
p 均等 払 \8.094X36 回 、\6.365X48 回 


@ シ ャ ー プ 
バ ソ コン テレ ビ X1 シリーズ 
一 般 テ レビ 放送 受信 可 
CZ-801C S R< 本 体 > 


CZ-801D 5 R< デ ィ ス フレ イ >| FC 819 
現金 特価 \187.000 --¥ 219,600 
均等 払 \6.441 x 36[8], Ұ5,065 X480 
CZ-802C 5 R< 本 体 > | 

CZ-802D 5 R< デ ィ ス フレ イ >| XD 新 製品 
現金 特価 \280.000 -- ¥ 326,000 


b 552&1/X 9,644 x 36[8], X 7.583 X48 回 


eNEC PC80S31 ¥ 168,000 


PC9801 ۰8801۰8001۰8001 MKII -8201 
p 153831, Y 1,129 x 2451. Y 4,994 X 36] 


17v TrF10(PC 用 )- 


合計 \164,400 p 均等 払 \6. 380 x 20 回 、\4. 413 × 30 回 


(FM 用 ¥ 125,.800 も あり ます ) 


KD390PC š 
ФІЛ 030 Y 148,000 


P 均等 払 \7.714X20 回 、\5.409 X30 回 
人 @ 関 東電 子 K-305PC ...... ¥ 128,000 
> 均等 払 \6.264X20 回 、\4.392 x 3081 


と た ーー 
@ エ ブ プ ソ ン 
FP80 ¥ 149,800 
p 均等 払 \7,366 X20 回 、\5,165 X30 回 


n 


p 均等 払 \9.338 20181, 6,547 X30 回 
eNEC 


NM9300RO( $5770 75) 


w253,000 PC-8853N < 超 高 解像度 > 


X BR 06-311-3931 
広 島 082-295-6873 
1%) 092-481-2494 


eNEC 


PC9 x 
PC-9801E (N88 ベー シッ ク 付 )・\215,000 
現金 特価 \185.000 p X6, 372X36 回 
PC9801F-1<16 bit> 
CPU+ キ ー ボ ー ド + ミニ フロ ッ ピ ー! 台 ) 
現金 特価 \280.000 
均等 払 \9.644 X36 回 、\7.583 X48 回 
РС9ВОЛЕ-2---.----.............:. 7% 398,000 
(СРИЯ%-Ж-Е, š ZFDDX 2 &) 
現金 特価 \340.000 
均等 払 \11.711X36 回 、\9.208X48 回 


PC-100 
PC-100model10 ・ 
( cPU キ キー сжат 


現 
PC-100model2 0 


(。CPu+ キ キー ホー ト 


( キー ボー ド ` ニニ FDD X2、CPU、 
p 均等 払 \16.361X36 回 \12.865x48 回 
現金 特価 \475,000 
PCKD651( 専用 カラ ー モ ニタ ) -: Y 198,000 
р 1536313 5.781 x 36E]. Y 4.550 x 48[8 ` 
現金 特価 \168,000 


OHIE 


GP500M ( PC 用 新 製品 ) 
PC ケー ブル ¥ 6,000 
р +7264, 2.799 х 18[8] (PC ケー ブル 付 ) 
現金 特価 (PC ケー ブル 付 ) Ұ44,000 
СР550Е‹;Ж БУ!) 72» Y 119,800 
p +723 5,568 x 20[8] , X 3,904 X30 回 
CPZ00W< カ ラー プリ ンタ > Ұ99,800 


:Ұ129,800 y 均等 払 \4.640 X 200, ҰЗ,253 X30 回 


CRT デ ィ ス プレ イ 


@ シ ャ ー プ 

14A131C<2000 文 字 、8 色 > Y 69,800 
p 均等 払 \3.248 X20 回 、\2.753 x 24 [8] 
14A132C <4050 文 字 、16 色 > …\118,000 
p 均等 払 \5.510X20 回 、\3.863X30 回 
14A142C< 高 性 能 0.39mm ビ ピッチ > 

¥ 99,800 


1 2м3 12С 


385 Ұ76,000» 均等 払 \3.737* 24 回 
¥ 189,800 CZ-140DS< 義 用 モニ タ > 


өз Y 89,800 
P 155811 Y 4,176 x 20[8] . ¥ 2,928 X30 回 
eNEC 

…… ¥ 168,000 


現金 特価 \225.000 P 2231 Y 8,294 x 200. ¥ 5,815 X30 回 


p 155834, 7,750 x 36[8] 
NM9400ROC€ 7) 27). 


> 9.300 x< 36] 
PCRP201 


Y 298,0 


РСКО551 
-¥310,000 № 353:1, Y 5,916 X20 回 、\4,148 x 30[8] 


Wa HE 270. 00 @ 関 東電 子 


¥ 118,000 


К124(4050%:3-)Ұ115,000 


b 均等 払 \D.538 X24 回 、 УЕЛ ХЕШ b 均等 払 \5.510X20 回 、\3.863 X30 回 


3 一 48 回 ま て 、 ボ ー ナ ス 払 も 可 、 


EE ЕЕ ИЕ に っ sz ooguE。 
全国 クレ ジッ ド さ 1 で ex みこ い 。 
保証 人 な し クレ ジッ LERE. FEO 


は 保証 人 が 必要 て す 。 


お 忙し い 亡 の 為 に 


AM10 時 か ら PM11 時 
まで 受付 (年 中 無休 > 


マイ コン 買 つ を ら キ ー ボ ー ド カ / өн сә f: 
¥3800 
m / || E ШЕШ mrss: 
意匠 登録 申請 中 ен 


| シャ ー プ パソ コン 用 ||| 富士 通 パ ソコ ン 用 


E xX-1 ш xFM-7 
ша xX-1D іш, メ FM-8 
m xX-1C Ш i ЕМ-11 [OAM cazas уа воо) 
ш хМ7-2200 _ パナ ファ コム 
(m) xMZ-700 | MSX 用 ш + С280 カ 7:99 
| マ ィ コン カバ バー 布製) EH + ү ш à EN 1 し ج‎ 
MZ-2000、MZ-80B 用 * CF-2000 オペ レー ト 7000 БЕДЕ; 
4... iB nl En HB-55 ж 4 ІВМ 5550 MM 
у3,000 * HIT BIT нв-5 la i v-r M68 
- «PASOPIA О Bl :-/-:0:07:225:2917 
NE パソ コン 用 но 0 | ЕЖ 他 | во 
(ия | ж РС-9801 әш Fk サン ヨー w ※ 多 置 の 特別 注文 は 御 相談 くだ さい 。 
ип ょ PC-9801F・E йы " *PASOPIA-7 ЭЖЕ 
ш  *PC-8801 ШЕ х,у | + SC 0 яа (マイ コン 用 ) 
ши *PC-8801MKII -3000 m 
іш. xPC-8001MKII | ОАЕ‹ この シリ ー ズ の み \4.800) || i * 777 VII, Ше ロッ クール 
жә * PC-6601 өш 4 МЕС N-5200-os mi 4 Hi クッ スク ; 2 Әби DUERME 
* А EH 4 富士通 = б Е テ )38mm x сүле 86m 
E ※ メ PC-6001MKII 9450 L3 (2M,M5) 9 ens ^ E 


ISOFTOP| の ゲー ム ソ フ ト 


eessse 


eessse 


スー パー ボウ ル あぶ く 丸 の 冒険 PART 2 エイ リア ン ・ メ イズ 


(X-1 シ リー ズ ) ІРІ. G-RM 型番 SX-003 (X1 シ リー ズ ) IPL. G-RM EL 14 (X-1 シ リー ズ ) ІРІ. G-RM 
(FM-7) 型番 SF-OO1 ҰЗ,500 型番 SX-002 Y3,500 | шшш 型番 SX-004 \3,300 
ハイ ・ ゲ ー ム 賞 は どれ の 手 に … 1 面 ク リア ー す る ご と に 向き が 変わ る 。 迷路 の 中 に 3 個 の コイ ン 。 全 部 拾 つ だ ら 
寅 返 り し た あぶ ぐ 丸 を 君 は 見 れる ガ 。 出口 へ 急げ ヶ お つと 、 エ イリ アン が まち が 
まえ て る 。 


ザ ・ ガ ー ド マン Ес аг, ш! ЖИШШ あぶ く 丸 の 冒険 PART 1 
型番 SX-005 ҰЗ,500 | am^ - SX-006 型番 SX-001 ҰЗ,500 || шшш 


きみ は 9 個 の キー 操作 を どこ まで こなせ る きみ の すご う で に 、 エイ リア ン も お も わ ず 次 々 と お そつ て ぐる ダコ の ペトリ ゴン に 立 
DB. 金塊 を 運ぶ きみ を 待ち うけ る 者 は …… むし ゃ ぶる い 。 プラ ッ ワ ホー ル の 向う に あ ち 向 か が う 、 あ ぶ ぐ 丸 。 落ち て ぐる 岩 の ク ワッ 
る も の は 。 ショ ヨン を 使 つ て ペトリ ゴン を だ お せる が ガ 。 


宛名 書き 専用 ソフ ト (住所 録 ・ 電 話 帳 ) 


- таш С] 
| ゆう びん 屋 さん вет 
° (X-1 シ リー ズ ) 型番 SX-501 .(ҒМ-7) 型番 SF-501 яе タッ ワラ コール 
EL mcos 2-25 TIE ао S 
cce Dui re- rs- det Ра ае. = == 926 7 стас x o im 


限定 し て 、 め ん どう な 操作 や 設定 を 除い だ 結果 、 は じ め て の 万 


で も 簡単 に 使っ て いた だ ける よう に な り ま し た だ 。 Y3,200 


画 お 求め は …… (商品 送料 は サー ビス い だ し ます ) E 
圭 国 パ ソコ ン シ ョ ヨッ プ まだ は 直接 右記 へ お 申し 込み こ だ さ ざい 。 ` 製作 = 10 sl = ae жЕ 上 ШТ E ON ON 
< 現金 書留 で ご 注文 の 場合 は 商品 名 、 住 所 、 氏 名 、 電 話 番号 を は つき り LEE n NE M c. HMM 


| 
発 | 

書い て お 送り ぐだ さい 。 W Із 
@ ぁ 銀行 振 込み で ご 注文 の 場合 は 商品 名 、 住 所 、 氏 名 、 電 話 番号 を ハガキ YJ Yy ” 
12| 


е E 7 株 =< 会 +L 
まだ は 電話 で ご 連絡 こく だ さい 。 大 阪 市 浪 : 会 06-643-3833( 代 ) 


2 2 
Lj "振込 銀行 | 三 和 銀行 恵美 須 支 店 ( 普 )No189879 


Caes 


% ОЛ ac, 宮城 
% こん に ち は 、 ТАР ЫДЫ ж 
4 f^ いま し た ょ 。 むず か し いて すね 
ARR с, Яй ца y - っ SRA аны тү, まい ま 
E IRD ELUTE, ^к 1 к 2152 ты 
イン の 方 々 も ムウ キッ ч ^ 34 そこで ちょ っ と ヒン (よー する に キー 
|), 88i W ш 285% a て ほし いん ょ ) を もら u 
T Я йыбы ТС 5 { s つえ な いか な ~ と 思っ 
ЖЕ 2 Rx 2%, Ab, CH MR. кыы. - る тайық PSE вр. 
2 っ る peA did du аа, с ТӨС ыллык ТТ Р 
EP қР” УИ і 256, м СС. Ас у, a sak 5. 
ма. 921 " T ps. ダ ` Иа ызла уы | Я " 思い ます ょ _ 。 "人 や た いで すね 
$ pR a て 得 y Jš pe Абаш „у! 1 t 5 ČA o この ゲー ム は 、 ハ ド 
„Ж = ошл: ыы Pes a d AES 夫 
2.4 ag, t E^ ) し まし た で は powE қамы e | Er 
LE Í R ON/ ま Roe e | 
ィ 名 前 に ビッ ク оғ イン ト に ぴっ くり ^ 
- が スコ دچ‎ b トル は まあ まぁ, ME CORE UEa E 
と ころ で 、 ИЕ ° нА зз, えー と で す ネ 、 いき な り 不 満 を % 
саз e EBAY ; айыда: Жез оғын a А 1 
pM こと で У; Ары нањ 5 に ы, 
ШЕЕ; EDL Tunna О ED 
۴ 2% ね い に 仕上 げ て 、 も う 少し 不 所 at 
s Mis amm CH „ый pue 月 大 
{ ` - қ Г < эж с 
まし か っ か し か し 、 何と いっ て ぉ っ * + ê = < ë Z 
СЕ 7 これ は ヨカッタ , ы ҒҰҒЫ- 
ん と る ナン セン ぇ て / G“ uz Ë Ó + Ë = 
: ん まれ せ で ・- ラ さ 
*t55iascl 
е “ПЁ FE 
C I "а £ É ў 
ЖЕ # А Á d Ë$ Z >= Е 
Р ر‎ аба зоо د‎ R4 
3 Pi あま 頭 ョ て 83 
% act у | 
Oi; СВОЯ 
な ん と ぁ ん 東京 168% を に は EÊ 
も うた ‚Ру жы 、 Xo асы 
きい | h z # £ O dam ろ 月 も か か Ape. корет "d > Z 
C 8 以 し 告 日 山 が っ た る ^^ 5 RD, TOU S 
さん 8 よ 上 た し め 由 AU * な ん た っ て 9 人 ря 
れ で 0 の FF で ti Зора оё біз». 5 中 
TII ج ا‎ TATE, зы i bay ОО тоо м. ? 
F = ; 2 J0 う 
M ATE ` ë な ん て まさ か あぁ ETR その あと っ i s 
Е みな か Eo Trig ODED ЖО: 
7 の よら 原 ペ ゼ 25%, さすが pn Q SED 282 о T 
で 感 う れ 色 イ = FOF ч に まい 第 2 パピ リュ wo 94 
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HUDSON SOFT 


HuWP 


ー ド プロ セッ サ 


日 本 語 
簡単 に 使え , 豊富 な 機能 


SHARP 


パソ コン テレ ビ X1, MZ-2000,MZ-2200,MZ-80B 


HuWP の 概要 


この ワー ルド プロ モッ サー ソフ ト は パソ コン 本 体 と 
1 水準 の 2965 字 及び 、 片 か な 、 ひ ら が な 、 英 数 字 、 
зба, は 従来 の テー プペ ベー ス の も の で は 非常 に 困難 で し た が 、 か な 

辞書 を 持つ こと が で きま し た 。 ま た 、R OM ベー ス で す の で 変換 は 大 変 高速 


純正 プリ ンタ ー に 漢字 ROM の 組み 
- 部 の 記号 な ど は 直接 キー 
漢字 HR ROMÊ MIN ас E Ed 


合せ で 使用 し 
Xr 


ます 。 使用 可能 な 文字 は 、 漢 字 ROM に 含ま れ て いる JIS 第 
ょ か な 漢字 変換 方 式 で 簡単 に 入力 する こと が で きま す 。 こ の 漢字 か 
り 、 本 体 の メモ リ ] を 使用 する こと な く 約 6400 字 の 読み 方 

Rs に 表示 し ます 。 


ます し 、 も ちろ ん 漢字 パタ ー ン の 表示 も 漢字 ROOM の お か げ て で 高 


ポー ド か ら 


ー 空 間 


文章 の 編集 機能 も 強力 で コン トロ ー ル コー ド を 用 いる こと に よっ て 、 нокй ピー、 移 動 、 イ ン サ ー ト (挿入 )、 デ リー ト (削除 ) な ど が 自由 自在 に 行え を ます 。 ま た 、 
娘 字 の サイ ズ は 倍角 、 全 角 、 半 角 が 自由 に 選べ アン ダー ライ ン も 引く こと が 出来 ます 。 作成 し な 女 書 は カセ ッ ト テ ー プ に 記録 また は 再生 する こと が 出来 、 そ れ に 要 す 
る 時 間 は 1 ペー ジ 当 り 1 分 以内 と 高速 に な っ て いま す 。 
以上 の よう に この ワー ド プ ロ セ ッ サ ソフ ト HuWP は 、 フ ロッ ピー ディ スク を 使用 し な い 物 の 中 で は 豊富 な 機能 を 持ち も 、 フ ロッ ピー を 使用 し な いこ と に より 、 ト ー タ 
ルコ スト も 大 変 安価 に な っ て いま す 。 
HuWP の 特長 HuWP の ペー ジ 構 成 
1) бл 5 i 1 
2) 1 ペー ジ に は 全角 文字 2,560 文 字 を 収容 で き 、 本 体 メ モリ ー 内 に 2 ペー ジ | 
記憶 で きる る 。 e 
3) カモ ッ ト ベ ー ス の ワー ド プ ロ セ ッ サ で あり な が ら 、 高 機能 で ある 。 
4) 画面 上 に 不要 な マー ク を 使用 せ ず 、 印 字 さ れる 状態 の まま 表示 に な る 。 : レイ 
ҮС : | T 
(倍角 、 半 角 な ども 画面 上 に 表示 され る 。) | е 
х a MOM TR 64 行 | Ха 
5) 用 紙 の サイ ズ に 合せ て 、 色 々 な 印字 状態 が 設定 で きる 。 40 文 字 X 9 行 
6 ) 文章 全体 の レイ アウ ト を 表示 する こと が で き 、 レ イア ウト 表示 中 で も 
通常 の 入力 修正 が 出来 る 。 Ed 
7) 文章 を 1 ページ 、1 分 以内 に 記録 再生 で きる | = | Мел eid 
4 Р : d F 9 
Жк の 時 読 А 新 後 を ` 7 T án 2 2 | 
- ‚ tises жол ш ワン タッ チ で 検索 し て くれ る | 本体 メモ リー に は 2 ペ 
9 ) 親切 な HELP 機 能 が ある 。 | ー ジ 分 入り ます 。 
10 フ ル マ シ ン 語 で キー タッ チ が 良い 。(X1 は 一 部 BASIC で 記述 ) ーーー 4%----с-- 
HuWP を 使用 する 際 必 要 な シス テム HuWP の 実行 
パソ コン TVX1 MZ-2200&MZ-2000 X1 の 場合 


本 ж CZ-800C MZ-2200 or MZ-2000 

プリ ンタ ー С2-800Р MZ-80P6 or 新 MZ-80BP5 
EPSON МР-80 ТҮРЕЗ, 100 TYPE3 
RP-80,FP-80 は PIO-3050typeMP06 
を 接続 すれ ば 使用 可 

漢字 ROM ボ ー ド CZ-8KR PIO-3055 


MZ-1R01 十 MZ-1R02(MZ-2000 の 場合 ) 
MZ-2200 の 場合 は 内 蔵 済 


グ ラ フィ ッ ク RAM | CZ-8GR 


1) 電源 を 入れ 、 本 体 附 属 の BASIC テ ー プ を まず LOAD し て 下さ い 。 

2) BASIC の LOAD 終 了 後 、 本 WP ソフ ト を カセ モット に セッ ト し 、“"RUN" し て 下さ い 。 
3) マシ ン 語 部 分 を 読み 込み プロ グラ ム は AUTO START し て 初期 画面 に な り ま す 。 
MZ-2200&MZ-2000 の 場合 

1 ) 電源 を 入れ 、 本 WP ソフ ト を カセ ッ ト に 
な お BASIC テ ー プ は 必要 あり ませ ん 。 
ソフ ト テ ー プ 読込 み 終了 後 、AUTOSTART し ます 。 


セッ ト し て LOAD さ せ て 下さ い 。 


2 ) 


MODEL : SHARP パソ コン テレ ビ X1 SERIAL X-3052-G \24.800 (変換 ROM 付 ) 


MODEL : SHARP MZ-2000, MZ-2200 


SERIAL WB-3500AY 24,800 (変換 ROM 付 ) 
WB-3500B¥ 19, 800 (変換 ROM 無 ) 


MODEL : SHARP MZ-80B 


HUDSON GROUP 


HUDSON SOFT 


(^F ソン 仙台 


ハドソン 札幌 /〒062 


ハドソン 金沢 /〒920 
ハドソン ン 東 京 /〒102 
ハドソン ン 大 阪 /〒542 
ハドソン 沖縄 /〒901 


SERIAL W-3500A \24,800 (変換 ROM 付 ) 
W-3500B Ұ19,800 (変換 ROM 無 ) 


札幌 市 軸 平 区 平岸 3 条 5 丁 目 4 番 17 号 コロ ナー ド 平 岸 IT201 РНОМЕ:011-821-1538 
県 仙 吾 市 宮 町 1 T H48285; PHONE:0222-65-7031 
沢 市 本 町 2 目 1 番 28 け РНОМЕ: 0762-23 1263 

京都 千代 田 区 麹町 4 J. 17855; 移 町 ロイ ヤル ビル 2F PHONE: 03-234 4996 
大 阪 市 南 区 南船場 4 丁目 2 番 18 号 佐野 屋 橋 ビ ル 5F PHONE:06-251 -1945 
21 沖縄 県 浦添 市 大 平 8 410%: PHONE : 0988(79)3361 


/〒980 宮 


B ken 


カー ソル の 移動 だ け で 拾 牌 処理 (5 つの Key で リー チ 、 ツモ 、 カン 、 ポン な ど 全 て 可能 ) 


2. 現在 の 持 点 が 表示 

トッ プ を 狙う に は 相手 の 点数 を 常に 意識 し て いて 下さ い 。 
3. あがり 点数 の 表示 

点数 表示 が 非常 に 詳し い の で 役 を 覚え る の に ぴっ た り で す 
4. ま ち 有 牌 自動 停止 機能 


HUDSON GROUP— 複雑 な まち 、 例 えば メン チン で 頭 を 悩ま すこ と な ど な く な り ま し た 。 
HUDSON SOFT 5. オ ー プ ン モ ー ド も 可能 
コン ピュ ー タ の 手作り を 見 な が ら 対局 、 あ な た も 負け 組 と は サヨ ナラ で すむ 


本 社 ・ ハ ド ソ ン 札 幌 プ 〒062 札幌 市 豊平 区 平岸 3 条 5 丁 目 4 番 17 号 コロ ナー ド 平 岸 20| РНОМЕ:011-821-1538 営業 所 ・ 仙 台 ・ 金 沢 ・ 東 京 ・ 大 阪 


LI 


^ IBM5550 
5'FD \9.800 

4 月 5 日 発売 
適応 機種 


XI-D 3"FD ¥ 6,800 
X| シ リー ズ T ¥ 4,000 
5"FD Y 6,800 


РС-8801/МКП 5"FD ¥ 6,800 
Т Ұ4,000 


PC-6000 シ リー ズ # 4,000 


+ 
T ¥4,000 
bid 5"FD | Ұ6,800 


君 は シン グル や バー ディー を 
目指 し て ティ イー ショット / 


AP" S S UB2ZN JES = gy F 


リー クラ プ ブ 。 お こう に 見 える は 
テイ ネ 山 ? 只今 か ら 、 本 格 的 3 次 
元 ゴ ルフ シミ ュ レ ーション ゲー ム 
4 の 始ま り 始 まり 。 プ レー は アニ 
ゴル ファ ー の T 選 手 。 な あん て 、 
実際 に 画面 上 で ゴル フ プ レー が 展 
開 さ れる 。 こ ん な ゲー ム 、 今 まで 
見 た こと ある ? サス ガ コ ン パ ク 
ト フ ロッ ピー 版 。 
この 本 モノ そっ くり の ゴル フ ゲ ー ム に チャ レン ジ す る は 、 
に 関し て は ちと うる さい 小久保 秀次 朗 君 高 一 
小久保 君 「 画 面 の 中 、 む こう に ホー ル の ピン が 見 える 。 ハ イ 、 ゴ ル 
ファ ー の ステ ッ プ 位置 は これ で よし 。 こ の 角度 な ら ビ ピッ タリ 。 打 球 の 
強 さ は と ‚ ゴル ファ ー が | 回 だ け 素 振り を する か ら 、 2 回 目 の ス 
イン グ の と き に テイ ク バ ッ ク 
(ホラ 、 勢 い を つけ る た め に 、 
クラ ブ を 振り か ぶる アレ だ よ ) 
の タイ ミン グ を 見 は か ら っ て 、 
エイ / と 、 ス ペー スバ パー を 
た た で と 。 打球 ほ ア レ ? 0 
B だ …… г? ティ ー シ ョ 
ッ ト は アイ アン で 打つ と フッ 
ク が か か り 易 く な る ん だ っ て 
上 空 の 風 に あお られ ちゃ っ 


ゴル フ 狂 の 作者 田中 裕二 


жиа» 


HUDSON GROUP нана 


HUDSON SOFT 


ЖЕУУЖ 
@ ハ ド ン ン 仙台 
ハドソン 金沢 
ハドソン 東京 
ハドソン 大 阪 / 


コル フ 狂 


L 幌 /〒062 
T980 
/T 920 
/〒102 
F542 
ハドソン 沖縄 /〒901-21 沖縄 県 


(PR) 


た の か 、 ゴ ルフ な ん て 初め て だ 
か ら な あ 。」 
小久保 君 、 ウ ッ ド で や 
り 直 し て 、 途 中 ラフ に 入れ な が 
ら も 、 何 と か 池 越 え に 成 功 。 
ここ で も う 一 度 あ た り の 状況 
を 見 る と …… ワン タッ チ で 画面 
は 広角 に 。 広 い 視野 を カバ ー で 
きる ん だ 。 ア / 右 横 に バン カー 
が ある ぞ 。 そ こ で 、 左 に 寄せ て 
хна と 、 ア レー/ 左 に も バン カ 


お も し ろ 体 験 者 
小久保 秀次 郎 君 ( 高 一) 


ー。 ハ アノ / ノ バンカー は サン ド エ ッ ジ で 強く 出す ん だ っ て 7 や っ と グ 
リー ン に ノ っ た けど 、 ピ ン ま で 遠い な あ 。 い つ に な っ た ら こ の ホー ル 
Ue 。 結 局 、 パ ー 4 の と ころ 、 倍 の 8 打 た た いち ゃ っ た 。 で も 確か に 


ホン ト に ゴル フ を や っ て る よう な 感じ も 。 こ りゃ 慣れ て きた ら バ ー デ 
ー も ホー ルイ ン ワ ン も 夢 じ ゃ な い ぞ 。」( 私 は 全 ホ ー ル 回 っ て 7 アン 
ダー で し た 。 作 者 ) 
感想 「 こ の や り 方 な ら 、 マ イコ ン ボ ー リ ング 、 マ イコ ン テ ニ ス 、 マ 
イコ ン …… 何だ っ て 楽し く な る と 思う な あ /」 


適応 機種 

PC-9801 5FD Ұ6,800 FM-7 T Y 4.000 
PC-9801F 5FD Ұ6,800 FM-7 5 FD ¥ 6.800 
PC-8801/mkII (共用 )5FD 6.800 XI-D 3'FD \6.800 
PC-8801/mklI (共用 ) T 4,000 X1-C T Y 4.000 


йл SRCEDCERI3485 Г П4ЙҒ17%; ао +— FF: 1201 PHONE:011-821-1538 
FIR lT Hi ТЕГІ ГН 40-28%; PHONE: 0222 65-7031 

石川 県 金沢 市 本 町 2 Г.Н 10289; , PHONE: 0762 23-1263 

東京 都 千 代田 区 麹町 4 本 日 7 番 5 号 麹町 ロイ ヤル ビル 2F PHONE: 03-234-4996 

大 阪 市 南 区 南船場 4 ] 24189; s 野 屋 橋 ビ ル 5F PHONE: 06-251 1945 

浦添 市 大 平 8 番 10 号 PHONE : 0988(79)3361 


全国 有名 書店 ・ 
パソ コン ショ ッ プ で 
お 求め 


AU љи. 
: am 
“Ж 保弘 A 


/ X1/XX1C/D 完 全 対 応 / / 


B5 判 /270 ペ ー ジ 
定価 2.800 円 (〒300 円 ) 


X1 ユ ー ザ ー の 皆さん 、 お 待た なせ し まし た 。 
ご こ CA の テン ン 語 は パッ チリ で Ге 
シン 語 な ん て 夢 の ま た 夢 き る 」 な ん て 嘆い て た 
人 も どう ぞ 実 物 を 手 に 取っ て 《 だ きい 。 これ 
か ら BASIC を や る 人 も 売り 切れ な いう ち に 
手 に 入れ と いて くだ さい 。 


近日 発売 予定 の A ス ヾ // 関連 書籍 


ГХТУ ЕНЕ > 「X1 ゲ ー ム ライ ブラ リー」 /5 
「X1 マ シン 語 入 門 」 で ひと 通り 勉強 し た あと 9 X1 に し か な い 機 能 を フレ に 引き 出し た プログ 9 
は この 本 で さら に レベ ル ア ッ プ , これ で 君 は T ラム 集 。 ゲ ー ム を 楽し ん で いる うち に BASIC i 
X1 の 全て を 知る Ф も マス ター。 E 


II PST] ишш. 03(209)2585 高田 馬場 本 店 /03(209)7376 新宿 店 03(342)4821 横浜 店 045(312)4611 
р ПЕЧИ Q= 0520451)7371 大 阪 梅田 店 /06(346)1552 神戸 三宮 店 078(332)3961 


斉 婦 リン コン に シャ スム フィット ん 


アピ コン の パソ コン デス クシ リー ズ は 各社 の パ 
ソコ ン に 適合 し た タイ プ が お 選 ら びいただけます 
詳し く は カタ ログ を ご 請求 下さ い 。 
場所 を 取ら な い ス ライ 
ド テ ー フ ワル は 両 サ 條 ・ 
べ ア リン グ 式 の スム ー 
ズ な 出し 入れ で スペ 
ー ス を 有効 に 利用 い 
た だ け ま す 。 

(A タ イプ に 採用 ) 
背面 は ワイ ヤー ネッ ト 
式 で 、 コ ー ド 類 の 配線 
に 有効 で も また オプ 
ショ ン の ペー パス トレ 
イジ の ハン ガー と し て 
使え ます 

( 各 タ イプ に 採用 ) 


f] 3660 X 847500 X ё &950" 


111700 x & 17600 X ж &680%% (+ 33578) 


f] A900 x 8 17 700 X 856807 ( +185) 


価格 構成 価格 構成 価格 構成 
シス テム 価格 е ¥45,000 本 体 CS-30…… ひ ……0i ド ーーーー… \25.000 本 体 CS-10……… ド ドー \33.000 
ペー パス トレ イジ P0-10 …………… ¥ 3,500 オー バド トド トップ MO=10mmsewenac \12.000 
オー バー トッ プ デ ス ク MO0-40……… \11.000 デイ スク ドラ イブ ハン ガーF0-20…\ 3,000 
LATAS eee ¥ 39,500 フロ ッ ピ ー ト レーFO0-30 ーー Ұ 3.000 
лені ж з Ұ51,000 
デイ スク ドラ イブ ハン ガー ГГ ペー パス トレ イジ オー バー トッ プ 
オ タテ 型 8 イン チ ・5 イ ンチ |, プリ ンタ ー よ り 打 ち 出 き Ку У 2657 
v の 2 ドラ イブ 対応 型 で 上 れ た 用 紙 を 受け る た め 間 H900 x 1811350% 
z +, ネジ 4 本 で カン タン の 物 で も MO-10 \12.000 
ンジ に 取り 付け られ ます 。 フロ ッ ピ ー ト レー 
ヨ 3 段 トレ ー 式 
Ж [111420 x && (132094 8 イン チ テ イス ク 対 応 
FO-20 ҰЗ,000 PO-10 ҰЗ,500 FO-30 \3.000 
ІСІС-СӘСІ 


商品 は 簡単 な 組立 式 で 短 時 間 で 組立 られ 
ます 。 〔 送 料 に 付き まし て は 品種 別に お 問 合 
せ 下 さい 。〕 実用 新案 登録 申請 中 


マイ コン ショ ッ プ ・ 事 務 機 店 に て 販売 中 で す 


アピ コシ | 
堺 市 築港 浜寺 西町 7 番地 -4 
TEL.——0722(68) 3399 


電話 で の ご 注文 も 受け 賜り ます 


шал 日 本 エレ ガン ト 株 式 会 社 2” 
E 
P. n x | 


Su 


kawa Es TÉ HR EET (X ^ O 12 £ x ww 


PC- 6001MK - П Af ШШ AUR TE. 
1) ゲ ー ム 進行 の ス ヒ 
料 \ 500 & 2%! ЮК さい 交換 し ます 


E る FENA 
= B 


・MZ5500 PC9800F 
* FD RAM256K 

・ 漢 字 R OM 

Ұ 6,800 


1 人 で コン ピュ ー タ (3 人 分 ) 相 手 に 
四 人 マー ジャ ン 楽 し いで すね 。 又 思 考 プ ログ ラム が 追加 され ま 
し た 。 他 に MZ2000、MZ2200、X1 Ұ4,000, MZ80B, 
PC8001 mK I] 、FM7、 PC6001mKII MZ-700, Y 3,000 


e 花札 (花鳥 風月 ) 


SA d S く か けず に 、 


+s FS 

етіл? ・ オ イチ ョ カブ 、 人 花 合わ せ 
== ・MZ5500 PC9800F 

Ее „ЕР RAM256K 

m. ШҰ т ・ 漢 字 ROM 
еәшейітлтее E inde 

お 金 を か けず に 1 人 で も また 、 友 達 と Аты Р やれ る 

花札 (オイ チョ カプ 、 花 合せ ) モッ ト で 3 


他 に 花 合 せ 


MZ2000, 2200, X 1. 


erf eADUCK 
- 


Y4,000 X1DY4,800 


・X1D 
ees 


dmn 800 


ら ぬ すま れ 255” 


BI 1 L 
ерді: vnm n s LA CU ARE Tk ROUT O MEC о 
ん ! ) し た ん が ~X l. Ме Башы 500 


° スパ イ っ て 
つら い の ね 


・MZ2200 
・MZ2000 


ある ドド っ ぱ の スハ パイ が а ЧИ 飲み すぎ て 


命令 書 を どこ - 置 い “у ЫЫ En ょ ガン ガッ する жат 
®& С АЕЭМЕР ФА う 【 サヤ LY a ERE 


MSX ソ フ NE S se ты Ж) 


トラ ンプ ゲー 


1E | U) z es 
ドア ッ フ プ ②⑫) 実 戦 的 判断 等 


т! な た ! "— Hb TI gosse すっ 


ョ シア デップ GS > > AS) 盤 が 完成 し まし た 。, 
WIH Z 3 X BFE BD ІНЕ > — 7 k jk 


*MZ5500 PC9800F 
* FD RAM256K 


Y 28,500 


に 一 番 新 し い 


1.DATA は 、 常 ! 3 年 分 を 記憶 2. 移 動 平均 線 は 任意 の 2 種 
類 を 描く こと が で きる 3. - 画 面 は 142 日 分 の 日 足 を 描く ( 約 半 年 分 ) 4. 
色 に よっ て 、 ロ ー ソ タク 足 、 出 来 高 、 引 値 足 、 移 動 平均 線 を 描く 


他 に MZ80B 、2200、2000、X 1、FM7 
り ます 


. PC800ImK [I Y 3,5005 4 


e DOWN 
BOMB 


* MZ 700 
*MZ2000 


Ee 


; レツ キー ) $ йн を ` ンド ン や っ つけ る GAME 
・ マ ン ). 地面 3 2 DE TNE LL 落と す 、 爆弾 は 何 か 
【 4 レッ を まき ご ん で や うけ る 。 爆弾 

トド ト 手 を する と 自分 も 爆風 に ま 


” ¥ 3,0000 


レー ダー を う 
を けれ ば いけ ない 。 


ө ブレー 
ラス ペ カ ス 
*MZ5500 PC9800F 


* FD RAM256 K 
・ 漢 字 R OM 


Ұ 6,800 


プラ ッ ク ジ ャ ッ ク 、 バ カラ 、KENO、 ル ー レ ッ ト の 4 種類 の 
ゲー ム が あり ルー ル は すべ て ラス ベガ スル ー ル に 準拠 


Ç 使用 し 敵 か ん 隊 を 全滅 させ 


、 ヽ の コン ビュ ー タ 版 で す 


d Uy ト ボ 一 カ ー | 


トラ ンプ ゲー ム の 最高 峰 コ ンピュータ と の か け ひ き 


ルー レッ ト | 


ご 家庭 で ラス ベガ ス 気 分 


Я F Z | 


日 本 の オイ チョ カブ に 似 た ゲー ム で す 


КЕ М О 
мез, 


E BEA Ж ム で ず 


漢字 ワー ドブ プロ モッ サ ー 夏 目 激 石 の 開 
全 を つく し て お り ま す が 時 々 ご めい わく を 


発 が 遅 れ て お り ま す 事 を 深く 
お 掛け すす る こと が あり ます 事 を 重ね て よろ し く お 願 い 致 し ます 。 


お わび 申し 上 げ ま す 。 文 ソフ ト テ ー プ 、 そ の 他 商 品 に 万 


@ 送 料 は 一 律 500 円 か か り ま す の で お 願い 申し 上 げ ま す 。 注文 は 現金 書 留 で 品名 及び 電話 番号 記入 の 上 お 願い 申 し 上 げ ま す 。 
@ 注 文 の 時 は コン ピュ ー タ ー の 機械 等 くわ し く 記 入 の 上 お 願い 申し 上 け ま す 。 


株 式 会 社 ウス 革 ノ ビ ソ コリ ッッ ゴー 


〒930 富山 市 総 曲 輪 3 の 6 の 3 тт (0764) 21 一 4181 代 )( 内 線 25) 。 党 革 間 : 午 前 10 時 午後 5 時 


С 漢字 が 誰 に で も 簡単 に 使え る シス テム 1 


тіпі ) 1/ の デー タ 機 器 の 漢字 ROM 又 は 、 MZ- 1R13 を 使用 し て 1 ЖС 
2000 文 字 の 志 概 虹 o( 夫 を 作成 する こと が 出来 ます 。 デ ィ ス ク 賑 で は シ 
ー ク レッ ト 機 能 が あり 1 ディスケット に 40 フ ァイル <〈 ら 万 文字 ) 記録 出 来 
. МИС 60520). IC Ө0ОООЙ) >т тл Tp D Ет. @ 
тз. OX. я>. АШ. W SO ЛЕШ СЕН ЕЕ cp THIET 2 — — 
шж, XEM. 1+ТШИ ШЕН EET, SEDTI N L- ショ ン で 印字 内 
容 を テレ ビ 画 面 で 見 る こと が 出来 ます 。 そ の 他 機 能 と し て は 、 計 算 機能 、 セ 
ンタ ー リ ング 、 右 づけ が あり ディ スク 賑 で は 外字 登録 も 出来 ます 。 書式 指定 
で 使用 する プリ ンタ を 指定 する こと が 出来 ます 。 カ ナ 河 字 変換 OM 対応 
MZ- 80 己 の 文書 作成 画面 は 、 模 0 文字 で 、MZー 000 の 文書 作 感 
ュー ) 画面 は 、 横 40 文 字 で 行い 左右 スク ロー ル は 一 行 の 印字 数 に な りら 最 高 50 文 
字 で 、 上 下 ス クロ ー ル は 40 行 100 行 で す 。 
上 記 I 旧 バー ジョ ン を お 持ち の 方 は 、\ 1 , 500 円 同封 の 上 当社 を まで ディ スク 又は け は カセット を お 送り 下さ い 。 


аоольфым- 
йи U 
- 22 B ER 
に 


記 
印 
H 
機 
LI 
(7—27 №8 xm 


【 KF1 1 Шаянуа;>л (ат) 


項目 数 : 最大 16 項目 項目 種 : 文字 / 数 値 / パス 
文字 数 : 0 文字 以内 ( MZ- 80B) 16x16 ドッ ト 
4 0 文字 以内 (MZ- 2000) 16х16 ドッ ト : 処理 
кан: ан 16 桁 以内 16x8 ドッ ト (半角 文字 ) : 処理 
т W: 2 万 文字 + 総 項目 文字 数 : АЗ? 
Жвании : 四則 演算 、 合 計 、 平 均 、 標 準 偏差 、 順 位 、 自 動 番号 : m 5432 
т ЮНИ : MAWN., GH. ғы. тәни. HIL : 5432 
m 字 : カー ド 形 式 ни m 
ж 形式 (‹7-@Н-Ж) : 処理 
タイ ブラ イタ 形式 
ЖЕН : シー ル 印 刷 、 封 簡 印 刷 番号 を 入力 し て 下さ い 。 ? = 
検 索 : の 量 打 件 検索 方 法 
検索 条件 …… 無 条 件 、 同 じ 、 大 きい 、 小 さい 、 含 む 、 含 まな い ( メニ ュー ШЕ) 
指定 プリ ンタ -- MZ- 80P6, MZ- IP07 指定 ディ スク -- シン グル ・ ダ ブル ディ スク 


【 オー ル マ シ ン 広 に よる 超 高 速 漢字 住所 内 1 


検索 速度 - 1000 名 中 、1 人 検索 時 則 最 高 50 徐 以内 8 1 

並び 替え 一 1000 名 並び 替え 時 間 5 分 前 後 

処理 人 数 - ЛС» 150% ディ スク 賑 1000% Ë 

Jm B - 氏名 、 フ リガ ナ 、 電 話 番号 、 住 所 1 、 住 所 ら 、 住 所 3 示 
郵便 番号 、 備 考 1 、 備 考 つ 、 備 考 さ 、 備 考 4 字 

i - 1200 語 (県 名 、 市 名 700 語 登録 済 ) ЭТИНЕН m 

外 ж - o5x* x 

WELA - シン グル シー ル 、 ダ ブル シー ル 、 ハ ガキ 印刷 理 

fm - 2 つ 重 条件 検索 方 法 

検索 条件 - ЖАН. RU. KEL, hèn, 46. SKIL 番号 を 入力 し て 下さ い 。? =M 

プリ ンタ - MZ- 80P6、MZ- IP07 

ディ スク = ジッ グル ディ スク 、 ダ ブル ディ スク С ディ スク 賑 メニ ュー ) 

住所 一 覧 - 表示 、 印 字 は 項目 を 自由 に 設定 する こと が 出来 ます 。( ディ スク 央 ) 

Я М - MZ- 2000( MZ- 2200) + グラ フィ ッ ク 3 ペ ー Y+ ディ スク ( カセ ッ ト )+ プリンタ 


+ P10- 3055( MZ- 1813) 
MZ- 80B+ グラ フィ ッ ク 1 ペ - ジ + ディ スク + プリ ンタ + P10O- 3055(MZ- 1R13) 


ワー プロ mini š MZ- 80 B 
7- Zümini : MZ- 80B 
ワー プロ mini MZ- 2000-MZ- 2200 
ワー プロ mini Я MZ- 2000 -.MZ- 2200 
漢字 ファ イル KF 1 ы MZ- SOB 
漢字 ファ イル KF1 А MZ- РООО»М2-2200 
AFEMI New) 3 MZ- 80B 
ЖТЕМИКС New) Е MZ- 2000 :-MZ- 2200 
ЖТЕМИКС New) " MZ- 2000-MZ- 2200 
T416 - 取扱 い 店 募集 中 
静岡 県 富士 市 長 通 1 04-3 お 求め は 全国 マイ コン ショ ッ プ 又は 当店 あて に 現金 書留 ( 送料 サー ビス) 
ンー に 機種 名 を 書い て お 送り 下さ い 。 


Ris. 0545) 61-1417 ` Иве: 午前 9 時 一 午後 7 時 -E Ж B: 毎週 水曜 日 


dB-SOFT 


語 題 沸騰 / 敬 異 の フリ ー エ リア 32K バ イト / 


dB-BASIC 


「 速 い 4「 広 い ム デー ビー ファ ン 既 に 万 人 突破 


誕生 / 


ава 15 гоян: теоеяязг 


lldB-IBASIC 24, 

Фі 2 н: – 32768 32767 XY СРЖ, 
@dB-BASIC の 姉妹 言語 と し て 、 扱 える コ 
マン ド 数 が 702 ま で 同じ 、 更 に dB-BASIC 
と の 違う コマ ンド は 付属 マニ ュ ア ル で 区 別 。 
dB- BASIC で 開発 し た プロ グラ ム も 多少 
の 改良 で コン パイ ル 可 能 。 

介 高 密度 な ゲー ム 作 り に 欠か せな い 広 い フ リ 
ー エ リア を 41KB 確 保 。 

@ ゲ ー ム 向き の コマ ンド 数 を 更に 増加 し 、 ゲ 
ー ム 開発 用 言語 と し て 強化 。 

@ プ ログ ラム し や すく 、 デ バッ ク る も 簡単 。 
шсіБ--://Х(> 
@IBASIC で 作成 し た プロ グラ ム が 、10 数 倍 
の スピ ー ド の マシ ン 語 プロ グラ ム に 変換 。 
PC-8801MK II 用 好評 発売 中 | 


ЧЕ A V; / А-2 (00) (м2 -2200) я 


@dB-IBASIC で 作成 し た ブロ グ 
ラム と コン パイ ル し た ブログ ラム 
で 、 速 さ の 違い を 確認 で きま す 。 


Wx m 

「 レ ー ザ ー プ ラ ネ ッ ト 」 
レー ザ 光 線 を か いく | ¢ 
ぐり 、 う まく 基地 に NI 
到着 で きる か 
画 MZ-2200 用 I? 
DRZ) | 
ааа. яши 
宝 を 盗み 、 ビ ル か ら 
逃げ られ る か 


dB-IBASIC/dB- コ ン パ イラ / 評 価 用 ゲー ム 
リフ ァ レ ンス ブッ ク / コ ン パ イラ ブッ ク 


各 6,000 円 


個性 が 生き る 、 高 速 グ ラフ ィ ッ ク 処 理 / 
dB-BASIC は 君 の 頭脳 の 一 部 と な る 


M AZrLE3U/:IMZ-z32z0(0(wz-220)8 


ШХІН Ver.1.2 
dB-BASIC バ ー ジ ョ ン 1.0 に 続き X| 用 バー ジョ ン 1.2 
発売 中 

@dB-BASIC を 更に バー ジョ ン ア ッ プ 。LINE 機 能 
の 強化 と 、 グ ラフ ィ ッ ク の GET・PUT コマ ンド を 
追加 する こと に よっ て 、 グ ラフ ィ ッ ク 機 能 を 強化 。 
ФХІ の PCG 機 能 を 利用 する と グラ フィ ッ ク 効 果 が 
グー ン と アッ プ 

リー エリ ア を 32KB ま て で 人 確保 し 、 ま た 必要 に 応じ し 
て 独自 の コマ ンド 定義 も 可能 。 


人 高速 演算 ルー チン の 採用 に より 、 従 
来 の 各種 ベー シッ ク よ り ス ピー ディ な 
処理 が 可能 。 


ШМ2-2200(2000) 
ФЕР CG 機能 の 搭載 に より 、8X8 

ドッ ト 単 位 で キャ ラク ター を 設定 。 
dB-BASIC プ ログ ラム カセ ッ ト / 評 価 用 ゲ 
ー ム カセ ッ ト / リ ファ レン スプ ブッ ク 


各 5.000 円 


TOTAL SOFTWARE HOUSE 


ぼく ぐ の 名 前 が きま っ だ ヨ ノ 


TIN < Aa. 


な ね いな が っ で ヨー シイ 


更に 機能 を 強化 し て 、 バ ソコ ソン テレ ビ XI| 用 好評 発売 中 が 


| 


80 Е 88 // 88813072 4832808 // 


dB-SOFT「NEW-=VIP」( 簡 易 言 語 ) は BASIC 知 識 を 一 切 必 要 と し ませ 
ん 。 対 話 型 デ ー タ 入力 方 式 の 採用 に より 、 初 め て パソ コン に 触れ る 方 で も 簡 
単 操作 。24 の コマ ンド を 押す だ け て 実行 命令 を 入力 で き 、 ス ピー ディ ー に 
処理 。 ま た 、 各 種 機能 は 朋 9・ 用 途 に 合わ せ た 組み 替え が 自由 … ユ ー ザ ー ズ 
サイ ド に 立っ て 開発 され た 汎用 型 簡易 言語 …… こ れ が 「NEW-VIP' で ま 


並べ 替え 自由 、 ソ ー ト 機能 組み 合せ 自由 、 高 速 検索 機能 
デー タ を 五 十 音 順 や 年 令 順 等 に 並べ 替 を る ソー ト 検索 条件 (名 前 ・ 年 令 ・ 住 所 等 ) を 設定 する こ 
機能 を 搭載 。 数 回 の 条件 入力 だ け で 、 素 速く ソー と で 、 迅 速 か つ 正確 に 検索 を 実行 。 複 数 条件 
ティ ング 条件 が 複数 項目 に な っ て も 実行 が 可能 。 に よる 検索 も 可能 、 入 力 方 法 は 簡単 。 文字 を 
画 年 令 に よる ソー ト 例 (ソー ト 前 ) 検索 条件 と し て 実行 きせ る こと も OK/ 


あら ゆる 作業 に 大 活躍 


顧客 、 仕 入管 理 、 名 簿 、 統 計 処 理 、 ま た 家計 簿 か 
ら 野球 の 選手 管理 に 下る まで 、 幅 広く 活用 


を の 他 の ^NEW-VIP" 機 能 
信 マ シン 語 記 述 で スピ ー ド 処理 。 豊 富 な フ 
リー エリ ア 43K バ イト 確保 
⑧ 対話 型 デ ー タ 入力 方 式 
る 大 き な 分 類 能力 
e 特に XI 用 に は 関数 計算 機能 を サポ ー ト 


(機種 に より 、 若 干 機能 が 異な り ま す 。) 


m 名 ポス 田 全 国 通信 販売 の ご 案内 (送料 無料 サー ビス . グ ) 
OBS elann — PIS TADK > 全国 の 皆様 へ 当社 の オリ ジ ナ ル ソ フト ウェ ア を 通信 販売 し て お り ます GR 
検索 を 行う こと が 可能 で 、 NEW-VIP の 印字 フォ ー マ ツ 料 無料 )。 ご 注文 は 現金 書留 か 銀行 振込 で お 願い し ます 。 振込 先 「 た く 

OS ト に 合わ せ た dB-SOFT オ リ きん 札幌 駅 前 支店 普通 053-053」。 銀行 振込 の 場合 、 住所 ・ 氏 名 ・ 電 
内 容 ・ 用 途 に 合っ た 効果 Po ジ ナ ル タ ッ ク ( 宛 名 ) シ ー ル で す 。 話 番号 ・ 商 品名 ・ 対 応 機種 名 ・ 個 数 を あら か じ め ハ ガキ で ご 連絡 くだ さい 。 
的 な DM 発 行 に 便 利 で す 。 н. 6 (500 枚 ロー ル X2 巻 ) …3.600 円 宛先 、 当 社 「OhiMZ」 係 まで 。( 沿 、 資 料 を ご 希望 の 方 は 、 右 下 の 資料 請求 
券 を 官製 ハガキ に 貼っ て お 申し 込み くだ さい ) 


宛名 書き 


画 テ ー プ 版 … &12 ВОО C uomo 
7—7 ... (2 алта қана 3 
Ф Mz -2200 (2000) BG MZ -80B 用 る MZ-1200(MZ -80K/C) OMZ -00RG иЗ: veXI 発売 元 デー ビー ソ J PHRI 会 社 


| [йэ] e ЕЗ348ООНСЕ к ЛАЛ ООЛ!) Foso ph k RR3RM2T AH PZERO] 1(251)7462 
@MZ -2200 (2000) 用 @MZ -80B 用 


リタ 中 衣 2 V £ P 


JÛ ° 


※15 回 払い は 一 例 で す 。 


Enjoy Computer A479 
あな を の /「 ノ コン へ を ご の て Ja] er, 


ソフ ト が 豊か な 人 気 バ ソコ ン 。 特 価 周辺 機器 で グレ ー ド アッ プ も 楽し め ま す 。 
а ШЕЙ Рн 


я 金 | 初回 の | 28808 2+ x Ho ° 

¥ 398,000 | ¥358,000 | ¥23,280 | %28,000 | Ұ57,280 | Ұ415,280 а 
② 富 士 通 FM-8 Y218,000 | Y 69,000, Ұ10,040 Ұ5,000 | ¥11,040 | \80,040 | 家庭 用 TV アダ プター サー ビス タ 
¥ 123,000 | \116.000| \9,.960 | \8,900 | Ұ18,560 | \!34,560 š 
¥ 275,000 | \239.000 | 25,240 | Y18,000 | Y38,240 | Y277,240 B 
¥ 143,000 | Y 120,000 | 13,200 Y 19,200 | Y 139,200 2 
%218,000| \98.000| *15,680 | %7,000 | Y15,680 | Ұ113,680 | グラ フィ ッ ク RAM ポ ボー ド 、RAM2P、3P |Ë 
(⑦ の 富士 通 FM-7 ж 126,000 | \115.000 | Ұ21,400 %8,000 | Ұ19,200 | Ұ133,400 | 家庭 用 TV アダ プター サー ビス i 
(8) カシ オ ЕР-1100 ¥ 128,000 | ¥59.800 | ж1з,360 | ¥4,000 | Ұ9,568 | Ұ69,368 š 
F ا‎ = 
Jz +—7MZ-80BF | ғ 298,000 | v128.000| ¥11,280 | 9,800 | Ұ20,480 | Ұ148,480 | |/O カ ー ド 、 ケ ー ブ ル サー ビス ( \46, 700) | $ 
ЕЙ: %-УМ21Ғ07, | ¥158,000 | 大 特価 提供 中 / ¥ 134,000 他 に サー ビス 有 て 
NEC PC-805S31 ¥ 168,000 | ¥ 142, 800 | ¥11,648 | Ұ11,000 | Ұ22,848 | ¥ 165,648 | |!/0 カ ー ド 、 信 号 ケ ー プ ル サ ービス ( \ 19,.000) | £ 
7 d 
リ | シ ャ ー プ MZ-80P4B | ұ281,000 | v155.000| 13,200 | ж11,900 | жга, воо | v 179,800 | |/0O カ ー ド 、 ケ ー ブ プル 付 |8 
J шағы Y 143,500 zr] Y 7,168 | \6,I00 | Y12,768 | Ұ92,568 | |/O カ ー ド 、 ケ ー ブ ル 付 8 
1 | シャ ー プ MZ-1P07 Ұ79,800) Ұ6,920 Ұ6,300 | *13,120 | Ұ95,120 | |/O カ ー ド 、 ケ ー ブ ル 付 їй 
MZ-700 用 カラ ー プ ロッ ター プリ ンタ ー 定 価 \39,000 を 特価 Y 22,000 い 


お 支払 方 法 均等 払い 、 ボ ポー ナス 併用 払い 、 ボ ー ナ スー 括 払 い 、3 回 一 36 回 ま て の 分 割 払い 等 ご ざい ます 。 毎 月 銀行 か ら の 口座 振替 と させ て 頂き ます 。 


東芝 ファ イン カラ ー デ ィ ス プレ イー 一 一 
ФРА-7165(147) zz ff ¥ 98,000 を 

大 特価 \69.800( 接 続 ケ ー ブ ル 付 ) 
ドッ ト 間 トリ オ ピ ッ チ 0.38mm の ノン 
グレ アハ イコ ント ラス トカ ラー プラ 
ウン 管 / 回 転 角度 調整 機構 付 

《 パ ソ ピ ア 漢 字 ROM PAC2) ` 
@PA-7247 定 価 \40,000 を 特価 \19.800 
《 バ パソ ピア RAM РАС2) = 
ФРА-7240 (4K) 定価 \14.000 を 特価 \9.800 
る PA-7242 (16K ) 定価 \28.000 を 特価 \19.600 
@PA-7244(32K ) 定価 \40.000 を 特価 \28.000 
ФРА -7248(64К) 定価 \56,000 を 特価 39,200 
《 パ ソ ビ ピア 用 プリ ンタ ー 
@PA-7253 定 価 \139,.000 特 価 \98.800 

(ケー ブル 付 ) 漢字 プリ ント OK/ 

カシ オ 漢 字 ROM パ バッ ク 
ФҒР-1032К(ЕР-1000/11009) 
JEH ¥ 35,000 + 特価 22,800 

カシ オフ ロッ ピー ディ スク 
@1020FD( デ ュ ア ル タ イ プ ブ 、FP-1000/1100 用 ) 


定価 \298,000 を 特価 138, 500 


シャ ー プ MZ-2200 特 別 セ ッ ト 


MZ-2200 十 グリ ン モ ニタ ー 寺 デー タレ コー ダ 


(MZ-IT02) 


XH ¥ 119,000 


MZ2000/MZ2200 用 周辺 
漢字 ROM ボ ー ド MZ-IRI3 

定価 \4|,800 を 特価 \35,500 
ФӨЕЗ-<-://2М7-021 

定価 \5,000 を "Rf Y 4,250 
@F-DOS MZ-2004 

定価 \50,000 を 特価 42,500 
@ グラフィック ボー ド MZ-IROI 

定価 \39,000 を 特価 \27,300 
@ グラ フィ ッ ク RAM 2 ペー ジ 、3 ペ ー ジ 

定価 \I6.000 を 特価 11,200 


MZ-1UO1 MZ-2000 用 拡張 |/0 ポ ー ト 
MZ-2000 の 利用 価値 を さら に 拡 

げた い 、 と いう 方 に 当店 な ら で は の 
ピッ クリ 値 で 大 放出 ノ 
正 価 \37.000 を 
特価 \19.000 
(送料 サー ビス ) 


シャ ー プ М2-2000 
大 特価 69,800 


パソ コン テレ ビ X-1 
CZ800 C/D 

シス テム 価格 \268,.000 を 
超 特 価 198,000 


У ЕТ 
本 体 価格 \ 119,800 
特価 \82,000 


富士 通 FM-8 用 漢字 ROM セ ッ ト 
@MB22002/22003 定価 \40,000 特価 Y 27,000 


通信 販売 も ご 利用 下さ い 。 全 商 品 、 特価 で クレ ジッ ト 取扱 いま す 。 特価 品 は 送料 着払 で お 願い いた し ます 


ご 注文 は 在庫 確認 の 上 、 現 金 書留 


多 は 、 銀 行 振込 み で お 申込 み 下 さい 。 全 


J t1 
im 


保証 付 、 中 古 品 は 扱っ て いま せん 。 


創業 26 年 信用 を モツ トー に 信頼 ある 商品 を 安価 に て お 届け 致し ます 。 


有 有 アマノ 電 和 谷 サ ービス セン ター 


192 東京 都 和 王子 市 北野 町 560-5 
* 京王 線 北野 駅 下車 徒歩 3 分 
八王子 駅 より バス 北野 駅 前 下車 


水曜 定休 日 


£0426 (45) 30013 fE RJ 


営業 時 間 /AMIO:00 一 PM7 :00) 


※ 本 誌 発行 時 に お いて より お 求め や すい 価格 に 変更 され て いる 場合 が ご ざい ます の で 価格 を 再度 電話 に て 二 確 認 下さ い 


| аже | 


X|・MZ フ ァ ン 待望 の ワー ブロ 真打 ち 登場 


その 名 も 6% > $49 


M" ph +з 1-і” c» tin’? юк» 1-390 


dE ©. ИИ КЕСИШКЕН еа 


‚ Rf. BÁ32- F70899-0/2N/195- 20. Вла, . . 
Vl, £OSELEB7DUU-7 422, БАШ ТОЙМЕН), tho 
ROBES. 1 PE HE рро 


aR 


E ipu : ; 
SIDE EUR "t 3 ЕЛЕ 


ТИШ 


uuuuu 


(XI 用 の 画面 で す ) 


i> 


aê 字 R OM 人 不要 
m2u xt — 4⁄2 X 
mF — VY Y FEL KD FE ph IL HE 
mJ|S KEDE ЭНЕТОК” 
u jio E3389] Pe 
ар ТОЖУ 
7 ЖЕ 


f] ROO + АНЕ 


ゅ ひら が な モー ド 
@ カ ツ カ ナ モー ド 
e 英 数 字 モ ー ド 
@ プラ フィ ツク フ モ ー ド 
e カナ 漢字 変換 モー ド 
ei 面 ホー ム 
өш 行 
e カ ー ソ ル 移 動 


@ 自 動 ス フク フロール 
e!) Е = hk 
e7 D У 727% л 
e レ イア ウト 表示 
@ 水 平 タ プ 設 定 
@ 水平 ツタ プレ ーション 
e 特殊 記号 ・ 単 位 表示 
e JIS コ ー ド 入力 ( 注 1) 


өл т? в в 
e^, 字 шш し 
e 短 x е iR 
ө УШ о ш し 
e 任意 文字 数 挿入 ( 注 3) 
e 任意 文字 数 削除 ( 注 3) 
e— t; 2707 
e70v22U72 


л — J Ж ЕД р 
ө} 組 d 
e 枠 組み 自動 補正 
ンタ ダー ライ シラ 
@ アン ダー ライ ン 上 自動 補正 
ex 8 LU — F 
ex E C= 7 
@ 文書 べ ベリファイ ( 注 2) 


る セン ター リラ グ 
e 倍 角 文 字 印 字 
e 印 字 文 字 間 隔 指 定 
e 印 字 行 間隔 指定 
e 任 意 行間 印字 指定 
e 用 紙 サ イズ 指定 ( 注 1) 
e 自動 紙 送り 指定 ( 注 1) 
@ 印 刷 枚 数 指定 ( 注 1) 


( 注 1) Xi・Xlc の み ( 注 2) MZ-2000・2200 の み 


( 注 3) MZ-2000・2200 は 一 行 (40 文 字 ) に 固定 


実物 大 で す 
CZ-80PK の 印字 見 本 M ン ンー1PO7 の 印字 見 本 
SHARFAVZILTTULEXIZU-X SHARP MZ-2000-2200 
日 本 語 ワ ー ド プロ セッ サー | йй 558 日 本 語 ワ ー ド プロ セッ サー 
後 能 も 価格 も 二 午 マル 。 9, 800 円 気軽 な ワー ブロ! 1 9. вооа 
| パー ソン ナル コン ピュ ー タ ー A > Ж». fi 格 
Х| 又は Хіс = 
Mo е. 9800» 
- - MZ-80P6X (+ _ 
dM RES ao. C RA ai ESE | ドッ トブ リン ター м2-1Р07 i iab نانو‎ 


ソフ ト 開 発 
総 発売 元 


б д б рид ср ы 


7:830 福岡 県 久留 米 市 通 東町 3ー4 
TEL (0942) 39-2404 


※ 通 信販 売 は 機種 名 を 明記 の 上 、 送 料 300 円 を 加算 し 現金 書留 で お 申し 込み 下さ い 。 


代理 店 募集 中 


e お 気軽 に お 問合せ 下さ い 。 


ユー ザー の た め の 
機械 語 ユ ー テ ィ リ ティ ー 


機械 語 便利 ソフ ト 4 種 


あな た の マイ コン は 眠っ て いま せん か ? 高い お 金 を 出し て 買っ た マイ コン で す 。 徹底 的 に 使っ て み ま し ょ う 。 機械 語 は マイ コン の 基本 で す 。 すべ て の プロ : 


グラ ム (BASIC, COBOL,FORTRAN, 
う 。 基本 が マス ター で きれ ば 、 す べ て に 応用 で きま す 。 こ れ か ら 紹 介する 4 種 は 、 


гре 他 ) は 機械 語 で 作成 され て いま す 。 あ な た も 、 機械 語 を 勉強 し て 、 マイ コン の 動作 原理 を 学ん で み ま し ょ 


今 か ら 機械 語 を 始め て みよ うと いう 方 、 も っ と マイ コン を 徹底 的 に 使い 


こ な じ て みた いと 思っ て いる 方 、BAS |C に 飽き た 方 、 な ど 初 心 者 か ら 中 級 者 まで 使用 で きる 便利 な ソフ トウ エア で す 。 1 度 、 使 っ て みて 下さ い 。 


逆 ス クロ ー ル する 
ラベ ル 付 
逆 ア セン ブ プラー 


多 機能 な 機械 語 
モニ ター 


好評 発売 中 


coepit mea etie. 


機械 語 動作 テス ト ツ ー ル 
780 RELOCATABLE TRACER 
pee プロ グラ ム は 、 それ 自身 で は 
エラ ー チ ェ ッ ク 機 能 が な いた め 、 バ グ を 発見 する の が 大 変 で 
+, そこ で 、 効 率 的 に 機械 語 プ ログ ラム の 開発 が で きる よう 
に 、 双 初心 者 は Z80 機 械 語 の 動作 を 理解 で きる よう に 、 使 
いや すさ を 徹底 的 に 追求 し た Z80 リロ ケー タブ ルト レー サー 
で す 。 ブレ ー ク ボイン タ 方 式 の デバ ッ カ 機能 、1 命 令 ず つ シ ミ 


ュ レ ー ト する トレ ー ス 機能 の 2 つの 機能 を 持ち 自分 自身 の リ 。 


ロケ ー ト 機能 を 利用 し て 、 あらゆる アド レス (モニ ター 部 、R 
0M 部 は 除く ) で の トレ ー ス を 可能 に し て いま す 。 


機械 語 解 析 ツ ー ル 

SCROLL DIS-ASSEMBLER 

スク ロー ル ディ ス アセ ンプ ブ プラー 

スク ロー ルディ ス ア セン ブラ ー は 、 巻 物 の よう に 上 下 に 自 
由 に スク ロー ル す る ラベ ル 付 Z80 逆 アセ ン ブ ラ で す 。 

機械 語 は 、 普 通 の ダン ププ ログ ラム で は 16 進 数 の 表示 し 
か で き な い の で 、 入 力 し た 機械 語 の 確認 や 、 他 の 機械 語 プ 
ログ ラム の 内 容 解 析 が 大 変 で す 。 そこ で 、 こ の ソフ トウ エア 
を 使用 する と 、16 進 数 の 機械 語 を 分 が リノ や すい ニー モニ ッ ク 
形式 で 、 又 ラベ ル 付 き で 表示 し て くれ ます 。 ま た 、 こ の ブロ グ 


ラム は 機械 語 で 作成 され て いる の で 、 高 速 に 解析 で き 、1 つ ⑦ 


の キー 操作 で 簡単 に 逆 スク ロ 一 ル も で きま す 。 


機械 語 入 力 ツ ー ル 
SELF RELOCATABLE MONITOR 


セル フ リロ ケー タブ プ ブル 

あな た は 、 マイ コン 雑誌 か ら 機械 語 кетет) を 打ち 込む 
時 、 入力 方 法 が 分 か ら な か っ た り 、 入力 ミス を し た り 、 モニ ター 
プロ グラ ム を 使い に くく 思っ た こと は あり ませ ん か ? 

セル フ リロ ケー タブ ル モ ニ ター は 各 マ イコ ン 雑 誌 か ら 、 機 
械 語 プ ログ ラム を 打ち 込む た め の 使い や すさ を 徹底 的 に 追 
求 し た 機械 語 モ ニタ ーブログ ラム で す 。 


T この ブ プログ ラム は 、 リロ ケー ト 機 能 が 付い て いる の で 自由 な アド レス に 配置 で き 、 


任意 な アド レス へ の 機械 語 の 入力 、LOAD、SAVE が で きま す 。 
2 機械 語 を 打ち 込む 時 、1 行 ずつ チェ ッ ク サ ム を 確認 し な が ら 入 力 が で きま す 。 


機械 語 テ ー プ 編集 ツー ル 
CASSETTE SAVER 
カセ ッ ト セイ バー 
機械 語 を テー プ に SAVE し て いる 時 、 ファ イル ネー ム 、 ア 
ドレ ス な ど が 分 か ら な く な っ た こと は あり ませ ん か ? 
カセ ッ ト セ イ バ ー は 、 カセ ッ ト テ ー プ に 記録 され て いる 機械 
語 の バッ クア ッ プ を 簡単 に 作成 し た り 、 カセ ッ ト テ ー プ の 情報 
(ファ イル ネー ム 、 各 アド レス な ど ) を 調べ た り 、 別 の テー プ 
に 編集 し な お し た り で きる ソフ トウ エア で す 。 
本 体 の RAM を フロ ッ ピ ー デ ィ ス ク の よう に 使用 し て 、 機 械 
ê. BASIC, 、 デ ー タ な ど を 空い て いる RAM エ リア に 次 々 に LO0AD LT, それ ら の フ 


アイ ルネ ー ム を 変更 し な)、 順 位 を 入れ 換え た り 、 各 アド レス を 変更 し た り し て 、 まとめ 
て ある い は 部 分 的 に ある い は 何 回 も テー プ に SAVE す る こと が で きま す 。 


1. 特 殊 な モニ ター は 使わ ず 、 標 準 装 備 の モニ ター 


2. 処 理 し た い 機 械 語 と アド レス が 重 な di c Sd c うだ 、 
変更 で きる よう に な っ て いま す 。( カ セッ ト ・ セ イ バ ー は アド レス と は 無関係 で す の で 、 
3. 約 4 ~ 6 KB の 機械 語 で 作成 され て いる の で 、 処 理 が 高速 で 、 


D この プロ グラ ム は 、 リロ ケー ト 機 能 が 付い て いる の で 自由 な アド レス に 配置 
で き 、 任 意 な アド レス で 機械 語 の トレ ー ス が 可能 で す 。 
Z80 シ ミュ レー タ を 内 蔵 し て いま す の で 、] 命 令 ず つ ト レー ス す る こと が で きま す 。 
ブレ ー ク ポイ ンタ は 32 個 まで 、 ル ー プ カウ ンタ は それ ぞ れ の アド レス に 対し て 、 
最大 255 回 まで セッ ト す る こと が で きま す 。 

4) スク リー ン エ ティ ッ ト 機 能 を フル に 使っ て いま す の で 、 各 レジ スタ の 修正 、 

フラ グ (ビッ ト 単 位 ) の 修正 が 簡単 に で きま す 。 

プリ ンタ 出力 機能 が 付い て いま す の で 、 トレ ー ス し た 結果 な ど を プリ ンタ ー に 

打ち 出す こと が で きま す 。 

逆 アセ ンプ ル 機能 が 付い て いま す 。 

リロ ケー タプ ログ ラム が 付い て いる の で 、 各 種 機械 話 を 自由 な アド レス に 

リロ ケー ト す る こと が で きま 7 

メモ リー ライ ト 、 メモ リー ダン プ 、 ブロ ッ ク 転 送 機能 も 付い て いま す 。 


①MZ.-700 用 


②MZ-1200.80K/C 用 | 
③MZ.-2200.2000.80B 用 | 
④ パ ソコ 77 VEXIRII 
8801(N-BASIC モ ー ド ) 用 
880Inkr 用 || 
各 М 4,000 


(マニ ュ アル 付 ) 


(0М2-7008 
EM 自由 に スク ー ル する の で 、 機 械 語 の 解析 が 楽に で きま | ⑳MZ-1200.80K/C 用 | 


スク ロー ルス ピー ド を 10 段 階 に 調整 する こと が で きま す 。 

ラベ ル 付 で す の で 、 リ スト を 見 や すく 出力 する こと が で きま す 。 ③MZ-2200.2000.80B 用 

I M 5 0 % な アド ° `. 

リロ ケー ト 機 能 が 付い て いる の で 、 自 分 自身 を 自由 な アド レス ④ パ ソコ ン テ レ ビ X([ 用 | ン テ レ ビ X1 用 
НЕКЕ ? 
[8801 (N-BASIC モー 


に 配置 する こと が で きま す 。 
5) オフ セッ ト 機 能 が 付い て いる の で 、 他 機種 (CPU は Z80) の 

qe 8801ък В) 
& v 4,000 


どこ の アド レス の プロ グラ ム で も 、 正 常に 逆 アセ ン ガ レル す る こ 
(マニ ュ ア ル 付 ) 
く ) 、128 バ イト ご と 、256 バ イト ご と ) を 出す こと が で きま す 


と が で きま す 。 
プリ ンタ ー 出 力 機能 、 アスキー コード 出力 機能 付 。 
①MZ-700 用 
D キー ボー ド の 一 部 分 を 16 進 キー 配置 に 変え て 、 機 械 語 の 入 ружата 
ます | ②MZ-1200.80K/C 用 | 


デー タ エ リ ア を 調べ て 設定 する こと に よっ て 、 その エリ ア は デ 
ー タ と し て 逆 ア セン ブル リス ト を 出す こと が で きま す 。 
スク リー ン エ ティ タ を 多く の コマ ンド で 使っ て いる の で 、 修 正 が 簡単 に で きま す 。 
プリ ンタ ー 出 力 機 能 が 付い て いま す に 
16 進 、10 進 、2 進 の 混合 加減 算 機 能 が 付い て いる の で 、 ア ドレ ス 計 算 な ど が |③Mz 2200.2000.80B 用 
で きま す 。 = CU 2 
サー チ 機 能 で 機械 語 の 検索 が で きま す 。 (s ジコ ワザ テレ ビ X1 用 | 
) リロ ケー タプ ログ ラム が 付い て いる の で 、 各種 機械 語 を 自由 な アド レス に リロ 
ケー ト す る こと が で きま す (8)PC-8001,8001mK T 
8801 (N-BASIC モ ー ド ) 用 
テー プ 
& ¥ 5,000 
(マニ ュ ア ル 付 ) 


〒 無 料 


〒 無 料 


6 一 7 種類 の チェ ッ ク サ ム (8 バイ ト ご と 、16 パ イト ご と 、 た て よこ (1.2 の 機種 を 除 


0 テー プ に セー ブ さ れ て いる 機械 庄 の 各 ア ドレ ス を 調べ る 機能 も 付い て いま す 。 
約 24 種 の コマ ンド を も っ た 多 機 能 機械 語 モ ニタ ー で す 。 
医 PC-8001 用 は 、 機 械 笑 を テー プ に SAVE す る 時 、 ファ イル ネー ム 、 スタ ー ト アド \ 
ス も 記録 で きる よう に な っ て いて 、SAVE さ れ た 、 テ ー プ は ROM モ ニタ ー の し コマ 
ンド で も 、PC-8801 モ ニタ R0M の "R2:RETURN|" コ マン ド (600 ボ ー) で も LO 
AD で きま す 。 


〒 無 料 


BASIC プロ グラ ム は 、 リス ト を 表示 し た り 、 修 正 し た り 、LOAD、 
SAVE が 簡単 に で きま す が 、 機 械 語 は アド レス が 関係 し て いる た 
め 、 分 か ら な く な る と 、 修 正 し た り 、SAVE し た り で きま せん 。 そ こ で 、 
この ソフ トウ エア を 使用 する と 、 簡 単に 機械 語 の ファ イル ネー ム 、 
トッ プア ドレ ス 、 エ ンド アド レス 、 エ ント リー アド レス 、 ファ イル モー ド 
な ど を 調べ た り 、LO0AD、SAVE し た りす る こと が で きま す 。 € f. 
ロー ドア ドレ ス を 変更 する こと も で きま す 。 


|①MZ-700 用 | 
| の MZ-1200.80K/C 用 | 
| ③MZ-2200.2000.80B 用 
| ⑳④ パ ソコ ン テ レ ビ X( 用 


テー ブ 
各 \3.500 TRH 


(マニ ュ ア ル 付 ) 


イル 順位 の 入れ 換え 。 ファ イル の さく 除 。 ファ イル 一 覧 表 の 出力 。 ファ イル の し 


ファ イル ネー ム 、 トッ プア ドレ ス 、 エ ント リー アド レス 、 ファ イル モー ド の 変更 。 ファ 
К, SAVE。 他 。 ブ リン ター 出力 機能 付 | 


は 、 次 の 3 つの 特徴 を 持っ て いま す ж 


を 利用 し て いる の で 、 使い や すく な っ て いま す 。 
リロ ケー ト 機 能 を 付け て 自分 自身 の アド レス を 自由 に 
あえ て 付け て いま せん 。) 
フリ ー エ リア を 多く 確保 する こと が で きま す 。 
で お 願い 致し ます 
š 現金 書留 又 
は 郵便 振替 で お 申し 込み 下さ い 


〒850 長崎 市 五島 町 7 


%0958-27-372БЕК) 
郵便 振替 口座 長崎 9 一 2690 


17 高島 ビル 


クラ ブッ クス УОС, 
SHA 


凶 み の 図形 や 記号 が 自在 に つ ( れ る 一 シャ ー プ の エレ クト ロニ クス 技術 が 、 パ ソコ ン ーーーー まな 拡張 用 オプ ショ ン =s 
ー ニ ザー 5 ー ゼ ーー ショ 

ユー ザー 定義 の キャ ラク ター ゼネ レー タ と テレ ビ の 独創 的 な シス テム を 実現 。 パ ソコ ン の Sa е — s= 

E a i B ides ッ ピー デイ スク CZ-800F E? Rk fii 2095-90077 

機能 が テレ ビ の 機能 を 拡大 し 、 テ レビ の 能力 Ton- Aia- -747 C1: -8FA МКА 24-ӨӨӨТ" 


が パッ コン の 能力 を 一 気 に 高め まし た 。 い まや ドッ トブ リン ター СВР ТТЛ 


パソ ツ コン は グラ フィ イッ クア ヒ リ テ (で 選ば れる 時 代 。 デジ タル チロ ッ ン *— CZ.8DT 検 準 価格 So нөө 
映像 表現 に 新 領域 と ひら いた スー パー イン グラ フッ ク RAM | ЖОСПАТ ШЕ ШЫ 


ポー ズ 機 能 を は じ め と し た X1 シ リー ズ の 新鮮 な ЖЕК ТЕ CZ-8KR 4% f (ifi fis pud 

"274 1! - カテ € -> — B ТТГ 
ЕТІ. ТАЗАЛА ТУ L 1432 A Ы MM E U E E dx а = чш: шыш IT 
プラ イオ リティ 機能 充実 ぶり 9。 ビ ギ ナ ー か ら エ キス パー ト ま で 多く 〈 の ЕЕЕ” язу, パー ター CZ SVC 検 準 価格 15-86077 


иштердин! CH 人 々 を 魅了 し ます 。 較 も も わろ ん 、 パ パソ コン と し て の 
強力 グラ フィ ッ ク 機 能 高 機能 も 見 逃 が せ な い 特長 で す 。3CPU 構 成 、 
シャ ー プ 独自 の クリ ー ン 思想 を 受け 継い だ メイ ン 
メモ 764K バ イト 、 ォ オー ル RAM。 標準 入出 力 


装置 と し て 、 X1, X1C に は 自動 頭 出し 機能 
備え た 2700 ボ ー の 高速 電磁 メカ カセ : ッ ト レ コー 


ダ 、 ま だ X1D に は 両面 倍 密度 3 イン チコ ン ン パク ト 


ыз A " 
フロ ッ ピ ー デ スク ド ライ ブ を 装備 。 を し て 、 こ うし た э i 
信頼 の ハー ドウ ェ ア に 密接 に 結び つい て を の 


タイ リン グ ベ イント 機 能 Vau 2 
ы 機能 を 最大 限 に 発揮 きせ る 強力 な ソフ トウ ェ ア 。 
BETANKE 置 を 任 間 に 指定 て きる x 1 シリ k= ズ は KOS ЖУ トマ シン tL て 、 ホー 
[ ム ユ ー ス か ら ビ ジネス ユー ス ま で 幅広 い 分 野 
へ の 応用 が 可能 な まさに 21 世 紀 の メ デイ アア です 


Ди е" Қыл 
Ф Ж ソフ ト 2000Ж гапо Ê us n 


NEC PC-9801F 4 シャ ー プ MI-5500 «> カシ オ FP-3000 | 


mZ-5521 X388,0007 TYPE-1 


> ө 256K バ イト @2DD Ұ148,000- 
2 mZ-5511 Ұ288,000- ТҮРЕ-2 
@256K バ イト @ 1DD 
実績 Na1 の 16 ピ ビット PC- “d т2-5501 ¥218,000- 


PC-9801Fi(1DD) Ұ328:000 ө 128K バ イト 


РС-9801Ғ:(200) 1398;000 


@ 快速 16 ビ ピッ ト 


a ペイ ・ 
СЭ ~ PC-100 シ リー ズ | v E. seres EP 


PC-100 モ デル 10(1DD モ ノ ク ロ ) 3X398,900- パソ コン テレ ビ X1  \155.096- e 快速 マル チ ス クリ ー ン 48 画 面 
PC-100 モ デル 20 (2DD り モノクロ) Ұ44%,000- パソ コン テレ ビ X1C Ұ119,800- @ 快速 簡易 言語 バビ ルス - П 
PC-100 モ デル 30(2DD カ ラー) Ұ553,000- パソ コン テレ ビ X1D 3X198,000 e 快速 カナ 漢字 変換 


Ar - - 画 お 支払 い は 便利 な ウレ ジッ ト で 
id RRR ë ポ ボー ナス 一 括 払 いい 実施 中 / 
e お 支払 い 例 (\215.000 お 買上 げ の 場合 ) 
国内 信販 で ご 利用 の 場合 e 住 友 カ ー ド タダ イヤ モン ド ゅ ユニ オン 
月 々 わずか \23.650 ぶ 10 回 日 本 信販 カー ド ゅ ミリ オン カー ド 日 
月 々 わずか  \12.680 ぶ 20 回 本 ダイ ナー ズ w JC B 


ベロ トー カイ プラ ザ sus r 
横浜 市 神奈 川 区 富 家 町 1 He xii TEL.OAS (42) 3005 


CRAZY FORMATTER 


MZ-80B 


MZ.2000m ЖЕ В, ООО (7200) 


MZ-80B、2000 の DISK-BASIC で 使用 する スレ ー プ ディ スケ ッ ト の ユー ザ エ リア を 、 
従来 の "Utility* プ ログ ラム て 作成 し た スレ ー プ ディ スケ ッ ト よ り 560 一 83.7K バ イト ユ 
ー ザ ー エ リア の 増し た スレ ー プ ディ スケ ッ ト を 作成 し ます 。 


"Utility" コマ ンド 
MZ-80B 1|М2-2000. 2200 | 
| 7)—€25— 97 | 102 | 
| ユー ザー エリ ア | 244.25K バ イト | 268 バ イト 
注 ) シャ ー プ 社 より 発表 の フロ ッ ピ ー デ ィ スク 装置 を 使用 し て 
また 、 付 属 の コピ ー コ マン ド は 途中 に キズ が あっ た り 、 フ ォ ー マ ッ ト さ る れ て いな い ト ラッ ク 、 
セク ター が 存在 し て 読み 込み 不可 能 な トラ ッ ク モ クタ ー が ある 場合 、 自 動 的 に その セ 
クタ ー を 読み 飛ば し て バッ クア ッ プ コピ ー を 続行 し ます 。 
(読め な か っ た トラ ッ ク モ クタ ー は モニ ター ディ スプ レイ に 表示 きれ ます 。) 


SUPER MACHINE LANGUAGE 


@ 雑誌 の プロ グラ ムリ スト の 打ち 込み に @ マシ ン 語 プロ グラ ム 作 成 時 の 虫 取 
り 用 に @ マ シン 語 の 勉強 に … と いう 方 に お すす め 


MZ Sok C. 1200m £T é S BOO (7200) 


Super Machine Language は 、 シ ャ ー プ 社 の マシ ン ラ ン ゲ ー ジ SP-2001 を 更に 使い 
や すく 〈、 機 能 的 な マシ ン 語 モニ ター と し て 作ら れ ま し た 。 スク リー ン エ デイ ター の 強化 に 
加 ぇ 、 メ モリ ー ダ ンプ ' の スピ ー ド アッ プ *・ 命 令 単 位 で の メモ リー ダン プ ・ 指 定 ア ドレ ス 
間 の チェ ッ ク サ ム の 計算 ・ プ ログ ラム リロ ケー ト ・ オ ペコ ー ド サー チ ・ ア スキ ー コ ー ド サ 
ー チ ・ メ モリ ー ペ イン ト ・ テ ー プ コビー・ コ ー ル コマ ンド … 等 便利 な コマ ンド も 弄 富 に 追 
nl 

また だ 、MZ.-80B、2000 用 に は 逆 ア モン プル 機能 が 、80K/C、1200 用 に は オー プ ニ ン グ メ 
ッ セ キー ジ 画 面 作成 コマ ンド が 追加 され て お り 0 ます 

また 雑誌 な どの ブロ グラ ムダ ンプ リス ト の 打ち 込み 5 スピ ー デ イー に 、 か つ 間 違い な く 《 入 
力 で きる 様 、 入 力 時 に チェ ッ ク サ ム が 表示 きれ 入力 ミス の 発見 も 大 変 楽に な が り ま す 

全 23 コ マン ド の 豊富 な 機能 を 持っ た マシ ン 語 モニ ター を この 価格 で . 


` CRAZY FORMATTER 
MZ-80B, 2000, 2200 
1312 セ クタ ー 


328K バ イト 


COFFEE BREAK 


ディ スク ユー ティ リティ ー シ リ ー ズ 第 3 弾 ./ Disk Backup Utility 


MZ ы tT ¥ CJ, ВОО F220) 


操作 は 簡単 … 最 強 の バッ クア ッ プ 機能 が 

ドラ イプ 1 に ソー ス デ イィ スケット を 入れ 、 ド ライ プ 2 に 新しい ディ スケ ッ ト ( イ ニシ ャ ライ ズ し て な 

い デ イス ケッ ト で OK ) を 入れ て 、 ス ター トト ラッ ク 、 エ ンド トラ ッ ク … な ど を 設定 する だ け グ 

コピ ビー 実行 中 ディ スプ レイ 上 に 各 ト ラッ ク に 施さ きれ て いる フォ ー マ ッ ト 状 況 や モク ター の 

並び な ど を 表示 し な が ら コ ピー を 進め て 行き ます の で 、 ディ イ スケット の フォ ー マ ッ ト や セク 

ター イン タリ ー プ を 調べ る の に も 大 変 便利 , ん 

その 他 機 能 & し て … 

@ パラ メー ター の 指定 に より 各 ト ラッ ク の フォ ー マ ッ ト を 調べ る 級 密度 を 指定 で きま す 。 
(た 史 ば 12 ト ラッ ク に 施 る きれ て いる フォ ー マ ッ ト だ け 特 別 級 密 に 調べ る 事 可 能 ) 

@ ト ラッ ク 、 セ モク ター 番号 が 有る の に 実際 に は 使用 きれ て いな い ダ ミー セク ター や 特殊 
フォ ー マ ッ トモ ー ド を 持っ た モク ター は 特定 の 記号 が 付け られ 表示 きれ 一 目 瞭 然 。 

@ フ ォ ー マ ッ ト 状 況 の プリ ンタ ー 出 力 5 可 . 

御 注意 

※ フ ロッ ピー ディ イス ク ド ラ イブ は デュ アル タイ プ '(2 ド ライ ブ ) が 必要 で す 


お な じみ 、 ロ ング "セラ ー ソ フト 


S-DOM 

MZ-8OB、B2 用 、MZ-2000、2200 用 ОО ы 

М2-8ОК C, 12008 & 学 9,8 (T200) 

S.DOM は 日 常 の ブロ グラ ム 、 デ ー タ ー の バッ クア ッ プ "か ら デ イス ケッ ト の 内 容 解析 や 

うっ か り DELETE "し て し まっ だ ファ イル の 復活 (B、2000 用 の み )… 等 に 幅広 し 利用 

で きる 様 に 、20 数 種類 の コマ ンド が 用 意 き れ た ディ スク ユー ティ イリ ティ ーブログ ラマ で 

1. 

< 一 例 > 

XFER コ マン ド : 指定 し た デバ イス 間 で プロ グラ ム や デー ター を ファ イル 単位 で 転送 し ま 
す 。 デ ィ ス ケッ ト 間 で は BTX、OB]、BSD、BRD の 転送 が で きま す 。 カ セッ 
ト テ ー プ ディ スケ ッ ト 間 で は BTX. OBJ. BSD の 転送 が で きま す 。 

DUMP コマ ンド : ディ スケ ッ ト の 任意 の トラ ッ ク 、 モ クタ ー の 内 容 を 1 セク ター 単位 で 表示 し 
ます 。( ス クリ ー ン エディ イッ ト で モク ター 内 容 の 書き 替え 可 ) 

DATA コ マン ド : 指定 し た ^filename" の 属性 、 ス ター ト ア ドレ ス 、 プ ログ ラム サイズ … 等 8 
項目 の デー ター を 表示 し ます 。 (スタート アド レス 、 エン ドア ドレ ス の わか ら 
な い 機械 語 ブ ログ ラム の 止 体 5 “ПА /?) 

MAP コ マン ド | ディ スケ ッ ト の 使用 状況 を 1 セク ター 単位 で 表示 し ます 

COPY コ マン ド | ディ スケ ッ ト の コピ ビー を 作成 し ます 。 (70 ト ラッ ク フ ル コピ ー 機 能 を 持っ て お り 
ます の で 、DISK-BASIC 等 は マス ター デイ スケ ッ ト の まま コピ ー で きま す 。) 

CNTL コ マン ド : フリ ンタ ー に コメ ント を 打ち 出し た り 縮 少 文字 紙 送り 幅 の 設定 を し ます 

SAVE コ マン ド : 指定 し た メモ リー 内 容 を 、BTX、OBJ、BSD、BRD の 好き な ファ イル モー 
ド で 、 カ セッ ト 、 デ ィ イス ケッ ト に モー プ し ます 

M コマ ンド К: (охе) КЁ 


その 他 、LOADS、MASTER、FULL…… 


シン グル デイ スク 対 応 、 実 行 結果 の プリ ンタ ー 打 出し 、 メ モリ ー 内 容 、 デ ィ ス ケッ ト 内 容 


の 表示 は 全て スク リー ン エ デイト 可能 


WORLD WIDE COMPUTER SUPER SHOP 


〒700 岡山 市 南方 5-6-5 今田 ビル 2ZF (県 営 グ ラン ド 入 口 向 ) 
TEL (0862) 54-7474 ミニ ファ クス (0862) 54-7481 

年 中 無休  АМ10:00--РМ7:00 

通販 は 現金 書留 又は 郵便 振替 岡山 4-12524 コス モス 岡山 
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(送料 サー ビス ) 


お 求め は お 近く の 有名 マイ コン 
の 上 現金 書 笛 で お 願い し ます 。 


ヨッ プ で 。 
通販 希望 の 万 は 使用 機種 名 明 


= 


ICES Se ТІНІН 
ВАС 。 ツマ イコ ンジ ショッ シフ 


IN はじまっ て 以来 の 
超大 作 ADVENTURE GAME 


アッ プル 風 本 格 的 アド ベン チャ ー ゲ ー ム 
画面 数 | 2 0 枚 の 超大 作 


| AUTOCRACY | 


ある 朝 、 あ な た は 起き て すぐ 昨日 見 た 夢 を 思い 出し まし た 。 それ 
は 不思議 な 夢 で 、 地 球 の どこ か で 独裁 政治 が 行わ れ て いて 、 そ こ 
に 住む 住民 た ち が 、 た い へ ん 困っ て いる … と いう 夢 で し た 。 あ な た 
は 頭 を 冷や す た め に 散歩 し よう と 思い 、 家 の ドア を 開け 一 歩 外 へ 
踏み 出す と そこ は 見 た こと も な い 所 で 、 ま だ 夜 で し た 。… う し ろ 
を ふり 返 え る と 、 も う 自 分 の 家 は あと か だ た も な く 消 えて いま し た 。 
— 田中 の 角 サ ン も ビッ クリ ググ 


パソ ジコ ン で 計測 制御 を し よう 
一 汎用 AIO PIO ボ ー ド キッ ド 新 発売 // 定価 15.000( 完 成品 定価 19.800) 


アナ ログ 
INPUT 


PC-800 | mkII H 
PC-8801,mkII 


®® KGB-PCI 


8bit М2-80В, М2-2000 
A/D 変 換 | PC-8000 シ リー ズ MZ-2200 . 
PC-800 I mkII 本 体 に 
PC-880! т® KGB-MZI 


各 パ ソコ ン の スロ ッ ト へ РС, MZ と も テス ト 用 
24bit プロ グラム, 回 路 図 , 
| 説明 書付 


パラ レル 
= キッ ト 価 格 \15.000 


INPUT 
OUTPUT 完成 品 価格 \19.800 


MZ-2000 
MZ-22000 各 パ ソコ ン の スロ ッ ト へ 


mzZz-eam(mio. GUB 設計 、 デ ザイ ナー、 ア ニメーション 、 ラ ボラ トリ ー オ ー ト メー ショ ン 等 を 考え て いる 人 / 


スー バーCAD 5 (ハー ド ) 画 デ ジ タ イ ザ か ら の 入力 (直線 自由 曲線 ) 
MZ-2000 CPU を 使っ て 図面 を 作成 し CRT に 表示 し 

ЗЕ Y 2B.DDO иот зене кош нн 
E MP-1000 X-Y プ ロッ タ フロ ッ ピ ー に 登録 、 呼 び 出 し が 出来 る 


金 当社 の 製品 は お 近く の マイ コン ショ ッ プ 等 で お 求め 下さ い 。 


また 、 製 品 等 に 関す る お 問い 合わ せ は 直接 当社 へ お 願い い 
至 日 光 太平 ビル 3F 
マイ コン ショ ッ プ た し ます 
BASIC „= 
法務 局 | 


8CH 


іннен 


国 
я -( š マイ コン ショ ッ プ BASIC. 


[| 〒320 FEET 3 J BB 2 一 17 太平 ビル 
会 0286 一 33 一 1994 ЗЕ (Ж) šT HJ dx IF 


ЕЗ 


EN 


至 栃 


シス テム ソフ トウ ェ エア コン バージ 


驚異 の 大 ヒッ ト 


シス テム ソフ トウ ェ ア コ ン バ ー タ 第 1 弾 ク 
MZ-2000 М2-2200 BASIC B6-2213 


名 機 MZ-2000、MZ-2200 用 の BASIC も 、 パ ソコ ン テ レ ビ XI で 
御 使用 に な れ ま す の で 、MZ の 豊富 な ソフ ト が 手直し する 事 
な くそ の まま 動作 し ます 。 一 部 マシ ン 語 も OK で す 。 

注意 : 本 ソフ ト は 著作 権 上 MZ-IZ001( Ұ2,150) MZ-1Z002 
(\7,000) が 必要 で す 。 


機種 : X1、X1C 


シス テム ソフ トウ ェ ア コ ン バ ー タ BIH. 
eA シス テム プロ グラ ム and マ シン ラン ゲー ジ 
В6-2218 


MZ-IZ005( シ ステ ム プ ログ ラム ) が A 面 、MZ-IZ006( マ シン 
ラン ゲー ジ ) が B 面 に コン バー ト で きる 様 に シス テム ソフ ト 
ウェ アコ ン バ ー タ が 入っ て いま す 。 マ シン 語 開発 ツー ル で 
す の で アセ ンプ ブリ 言語 で プロ グラ ミン グ し た い 方 に は 最高 
で す 。※ 本 ソフ ト は 著作 権 上 MZ-IZ005 ( Ұ25,000),М2- 


IZ006( \7,000) が 必要 で す 。 
機種 : X1、X1C 定価 \4.200 


シス テム ソフ トウ ェ ア コ ン バ ー タ 第 4 弾 


DISK BASICandCOLOR DISKBASIC 
<> В6-2214 
MZ-2000・2200 用 の DISK BASIC を パソ コン テレ ビ XI| CS 


か す ソ フト で B 面 に は COLOR DISK BASIC(MZ-2Z002) の 
コン パー ト ソ フト が 入っ て いま す 。 

※ 本 ソフ ト は 著作 権 上 MZ-2Z001( Ұ10,000)М2-22002 ( ¥ 
12,000) が 必要 で す 。 


定価 \3.800 


ASIC HOUSE w 


IM コン フエ ルビ スマ // が ソフ ト だ け で 
続々 マシ リー プ 発 売 中 MZ-2000 MZ-2200 に 早 変 りん 


シス テム ソフ トウ ェ ア コ ン バ ー タ Жой 
LOGO апа PASCAL В6-2217 
パソ コン テレ ビ XI で 人 工 知能 言語 、 タ ー ト ル グ ラ フ ィ ッ ク 

ス で 思い どおり の 図形 が 描け る MZ-L0GO が 動き ます 。 

また B 面 に は 話題 の 言語 PASCAL の コン バー ト ソ フト が 入 

っ て いま す 。※ 本 ソフ ト は 著作 権 上 MZ-LOGO( Ұ9,800). 
MZ-1Z004(\12,000) が 必要 で す 。 


機種 : X1、X1C 定価 \ 4,200 


シス テム ソフ トウ ェ ア コ ン バ ー タ 5%. 

倍 精度 BASIC and 倍 精 度 DISK BASIC r$ 
В6-2215 % 
実務 ソフ ト の アプ リケーション を 御 使 用 に な る 場合 た い へ 

ん 便利 で す 。※ 本 ソフ ト は 著作 権 上 MZ-1Z003(\7,000) あ 

る い は MZ-2Z003(\12,000) が 必要 で す 。 


機種 : X1、X1C 定価 \4.2OO 


シス テム ソフ トウ ェ ア コ ン バ ー タ 特別 企画 / 
N-BASIC В6-2220 
パソ コン テレ ビ XI が 名 機 PC-8001 に 早 変 り 。PC-8001! の アプ 
リケーション ソフ ト が XI に て 手直し する 事 な く 動き ます 。 

※ 本 ソフ ト は 著作 権 上 XI| と PC-800| を 持っ て いる 方 に 限り 

ます 


開発 室 速 報 // お も し ろ ま じ め な 製品 を 続々 開発 中 / 

田 パ ソコ ン テ レ ビ X1 で 世界 の コン ピュ ー タ が 動い た ら ス ゴイ で し ょ う ね / 

田 MZ ン シリ ー ズ 、X1 シ リー ズ 用 5 イン チ DISK(1.0MB) 開 発 中 し か も 従来 の ソフ ト も 動く か も 

圏 パ ソコ ン テ レ ビ X1 で MZ シ リー ズ の IO ボー ド (RS-232C、GP-1B、A/D そ の 他 ) が その まま 使用 で きる 
拡張 /O ス ロッ ト 開 発 中 (X1 用 各 2 ス ロッ ト づ つ ) 

画 ゲ ー ム ソフ ト の に が て な BASIC HOUSE が 中 人 根 チ ャ ン も ビッ クリ する 様 な 超大 作 を 開発 中 (X1 に て ) 


. ーー | 
機種 : X1、X1C 定価 v 4,200 機種 : X1、X1C E A800 
D UU ”YÇI”R⁄é£⁄IIIZIE,IISv,€IAIIIA I 

ХІ РС-8001 —?(02:-BO00: sorores B6-1483 — Y 3,800 MZ-700 РС-8001->М2-700--:-:--%-:- B5-1483 . Y 3,800 
РС-8801 —(G7 800: suene B6-1493 ¥ 3,800 PC-8801—MXZ 700: B5-1493 ¥ 3,800 
MZ-80B・2000 —$O2Z -800* «eene B6-1413 ¥ 3,800 PC-6001 —MZ-700:::: B5-1473 ¥ 3,800 
М2-80К,/С-1200-С2-800---------- В6-1433 ҰЗ,800 ХІНІРтУУЭ---езееесееенеее. B6-2109 Ұ4,200 

РС-6001 ->02-800---------- В6-1473 ҰЗ,800 


-«3»»7 ВАО: ТЕ..0286-33-1994 


(株 ) 計測 技研 


電話 で 深め よう マイ コン の 世界 


シャ ー プ パソ コン テレ ビ X 1 
CZ-800C/D Y 268,000 
48 回 分 割 ¥ 6.550 プ 60 回 分 割 w 5.581 
CZ-8O1C/D ¥ 219,400 , 
£ а 名 定価 円 48 分 割 602) 
48 回 分 割 ¥ 5.362 プ 60 回 分 割 \ 4,569 cg-sioe 熟 転写 プリ ンタ 80.000 1.955 1.666 
CZ-802 C/D ¥ 326,000 СЕЗ - EX uere EA 1 Қ өре 4.123 
48 回 分 割 ү 7.967 ノ 60 回 分 割 ү 6,789 ск" コッ ы 0% i 217 ーー "3.128 2.665 
® 名 ag ЕГІНТГЕТГІЕН /7- 7MZ55007 !J — Z 
CZ-800C 本 体 155.000— 3,788 3,08 ша 定価 / 円 48 分 割 6098 
CZ-800D カラ ー デ ィ ス プレ イ  113.000— 2,761 2,353 м2-5521 388.000— 9.481 8.080 
CZ-801C же 119.600・ 2,922 2.494 5511 288.000-- 7.038 5,998 
CZ-801D カラ ー デ ィ ス プレ イ 99.800— 2.438 2,078 5501 218.000・ 5.327 4540 
CZ-802C 本 体 198,000- 4.839 4,123 2 кей 
CZ-802D カラ ー デ ィ ス プレ イ 128.000・ 3,128 2,666 М2 1010 418,000->10,215 8.705 
cz-8SR グラ フィ ッ ク RAM 32.000・ so вю MZ а е 
CZ-8EP 拡張 |/O ポ ー ト 11,800+ 300 20 м2 ê ФА? E 
CZ-8KP 漢字 ROM 38.00 900 700 м2 in 5 ба 
CZ-8FA フロ ッ ピ リ /F 24,000+ 600 500 Му > P E 
CZ-800F ミニ フロ ッ ピ ディ スク 186.00 4,0 4.00 мо po "i 1.290 
CZ-800P ドッ トブ プリ ンタ 142.800 3.400 2.900 М4 p04 : | d заи 
CZ-8VC RF ビデ アオ コン バー タ 15.800— 400 300 T ЫНА | о ° 
CZ-8DT デジ タル テロ ッ パ ー 89.800 2.100 1.800 MZ IPO6 の 234.000・5.718 4,873 
/ や ウコン テレ シャ ー プ CRT シ リー ズ 
v ® 名 а 名 定価 / 円 48 分 割 609i 
AN CZ-140DS RGB14 型 カラ ー 89,800— 2,000 1.700 
A. ТЕГІ 14M-131C RGB14 型 カラ ー 69.800— 1,600 1,400 
14M-142C RGB14 型 カラ ー 99,800+ 2 300 2.000 
14M-132C RGB14 型 カラ ー 118.000 2.700 2.300 
мы 14M-111C RGB14 型 カラ ー 87,800-" 1,600 1.300 
as 14M- 141C + 1,605 1,368 
15M-412C + 2.714 2,313 
シャ ー プ . MZ-22OO シ リー ズ 12M-314C F 5 > 2,944 2,509 
CZ-210D F 48772 17 * 4,117 8,508 
MZ-2200 Y 128.000 ом-202с RGB20 型 カラ ー 175.000— 4.000 3.400 
8 回 分 割 M 3,9007 8082 m 2-00 MSX *$1734A74720h] eH —7 554 / 
м2-1т02 デー マタ レコーダ 19.800- 500 400 特別 セー ル 中 その は か 名 社 別 の プレ ゼン ト 付 / 
MZ-1F07 ミニ フロ ッ ピ ディ スク 158.000— 3.800 3.200 
MZ-1P07 80 桁 ドッ トブ プリ ンタ  79.800- 1.900 1.600 "T j 
MZ-1M01 16 ビ ピッ ト ポ ー ド キッ ト 78,000- 1.800 1,500 | 日 本 楽器 製造 定価 / 円 59m 
MZ-1R08 漢字 ROM ポ ボー ド 29.000・ 700 500 | YIS803 49,800-3,347 | 
MZ-1D06 カラ ー デ ィ ス ブレ イ 102.000 2.400 2.000 YIS-503 64,800->4,355 
MZ-1D09 14 型 TV モニ タ 110.000 2.600 2.200 im ы 
MZ-80P4B —— 136 桁 ドッ トブ プリ ンタ 281.000 6.700 5.700 | SFG-01 FM サウ ンド シン セ サ イ ザ ュ ニッ ト 19,800—1,330 
MZ-1D15 カラ ー ア ィ ス ブ プレイ 72.00- 1,700 1.400 YK-01 ュー ジッ クキ ー ボ ー ド 17,800—1,196 | 
мегой - aaa ae ой | 10.000 ・ 20 700 ゼネ ラル PCT-50( キ ー ボ ー ド 付 ) 146,500->9,298 
シャ ー フ  MZ-3500 シ リー ズ 富士 通 FM-X 49,800->3,347 
MZ-354 1 Y 410.000 | 東 き * パ ソ ピ ア Q。HX-10D 65,800—4,422 
2 ¥ 9.80060 回 分 割 х 8.300 | нх-105 55,800—3,750 
4 | \ 320. | Bi MB-HI 62,800->4,220 
48 回 分 割 ¥ 7.600 プ 60 回 分 割 6,500 MB-HIE 54,800—3,683 
9 名 а 名 定価 / 円 48 分 割 60930 == 
MZ-1P8 漢字 プリ ンダ 540.000-412,900 10.900 | =# Мы 59. 8004019 
CE-330P 136 桁 ドッ トブ リン 159.000 3,800 3.200 ソニ ー HIT-BIT、HB-55 54,800->3,683 
СЕ-338Р 1368 707/9 310,000— 7.400 6.300 | 松下 電器 СЕ-2000 54,800->3,683 
MZ-6P01 /Оо-к 12.000— 300 200 ç 
MZ-IF02 ミニ フロ ッ ピ ディ スク 198,000- 4,700 4.000 三洋 電機 MPC-10 74,800->5,027 
MZ-IF03 増設 フロ ッ ピ ディ スク 90.000- 2.100 1.800 РНС-30 64,800->4,355 
CE-331M ミニ フロ ッ ピ ディ スク フ 350,000- 8.300 7.100 К 
MZ-1F05 フロ ッ ピ ティ スク 398.000・9.500 вш | キャ ノン V-10 54,800->3,683 
MZ-1D03 カラ ー デ ィ ス プレ イ  163.000— 3,900 3.300 ビク ター HC-6 64,800->4,355 
シャ ー プ PC-5000 シ リー ズ パイオニア PX7 89,800->6,035 
PC-5000 Y 350. 000 ※ そ の 他 周 辺 機器 も 全て 取扱 っ て お り ま す 。 


48 回 分 割 \8,.553 / 60 回 分 割 \7,288 
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周辺 機器 も 全て 取扱 つて お り ま す 。 


全国 どこ か ら で も 電話 1 本 (無料 ) で 、 
商品 先取 り / お 支払 い は 楽々 フレ ジ 
ツ ト て で 胸 キ ユン / TY. 

豊富 な バリ エー ショ ン 
の 中 か ら 自 由 に 組み 合 
わせ て ぐだ さい 


〒110 東京 都 台東 区 北上 野 2 丁目 12 番 12 号 
営業 時 間 プ 午前 11 時 一 午後 7 時 年 中 無休 


の 03(844)3361 


@ 他 に オー ディ オ 、 ビ デオ 、 バ ー ソ ナル 無線 も 取り 
扱 つ て いま す 。 フ レジ ッ ト は 1 一 60 回 まで OK 
で す 。 

@ 初 回 金 の み 、 端 数 金額 処理 の だ め 、 上 記 金 額 よ 
り も 少し 多く な り ま す 。 

@ 契 約 後 の 取 消 は 規定 の 手数 料 を 申し 受け ます 。 


る この 他 の 新 製 品 の 御 予約 も 受付 け ま す 。 


| アコ リッ ト マイ コン 最新 カタ ログ | 
| シャ ー プ ポケ ッ ト コ ンピュータ | 


PC- 1245 ж 17,800 
48 回 分 割 \ 400/60 回 分 割 w 300 
РС-1500 M 59,800 
48 回 分 割 \ 1.400/60 回 分 割 ¥ 1,200 
ее 

に 0 こ 合 コ 

カシ オ 楽 が き PV-2000 50427 
¥ 29,800—› ¥ 23, 800 願 を 品 御 上 

tZ コン ピュ ー タ ビデ オ ゲ ー ム |581 
SG-1000 %15,000-» Y 12,000 し る は く や で 
SC-3000 v29,80—v23,80 22622 
任天堂 ファ ミリ ー コ ンピュータ | °W | S Rh 
x14,800— 11,800 | $95 "^ 


圏 カ シオ EP-1100 キ ソフ ト 

= Ұ65,000 

PC-8001( 下 取 品 ) 

=\50,000 

€ JR-100 上 RF コン バー ター 
+77 k3% = ¥ 30,000 

e JR-200-2-7n477 Ж (1) | 
+Y 7 k2% = ¥ 40, 000 | 

MZ-731— ¥ 83, 000 


Oh-MZ 愛 読者 特別 セー ル 


| BNEC 
| 
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Ш; аЛ. 


ГРУЗ 


テレ ビ 標準 価格 48 回 均等 60 回 均等 
ナシ ョ ナル TH2IH55GR \219.000 #5,037 Ұ4,292 
ГА THI9L55GR % 188,000 4,824: Y 3,684 
ГА THI5M55GR 139,000 3,197 ж2,724 
„ THI4NVI %208,000 ж4,605 3,924 
y=- KV-20XR2 ¥199,800, 4,481 ¥3,818 
/ <  KVI8XR2 © ¥179,800 \4.032 ¥3,436 
ビク ター АУ260 \290.000 6,527 Ұ5,562 
и АУ-200 x210,000 \4.709 Ұ4,013 
ж Ж 21К691| x215,000 \4.821 Ұ4,108 
ГА 15K31 ¥ 129,800 2,910 2,480 
C.I 19%) 5 * 3,252 


CI 14%) y 2,086 


NV-630 { \3.613 

7 NV-330 ¥ 159,800 ¥3,170 Ұ3,015 

ГА NV-370 \132.800 Ұ2,864 ¥2,440 
ナシ ョ ナル NV-800 x289,800 \6.665 Ұ5,680 
/ NV-850HD %030,800 5,238 \4.700 
уш- SL-F5 x169,800 ж3,808 Ұ3,245 
ГА SLF3 x145,000 \3.169 Ұ2,771 
ГА SLFI7 x132,000 3,036 2,587 
/ SL-HF77 \299.000 6,877 Ұ5,860 
Й SL-HF66 ¥ 249.800 ¥5,745 Ұ4,896 
ビク ター HRD225 ¥ 195,000 \4.373、\3,726 
Г HRDI20 x148,000 3,810 2,842 

B: x VT-16 X173,000 *3,880 3,306 


お 支払 い は 楽 な 長期 クレ ジッ ト 


48 回 /60 回 


人 @ 現 金 の 場合 は お 問い 合わ せ 下 さい 。 フ 
レジ ッ ト は 3.000 円 以上 の 組み 合わ せ に 
願い ます 。 


中 入谷 交叉 点 信号 機 


x 
語る うく いす 谷 駅 より 15 分 位 
8 лами 5 分 位 


わ パソ コン を 買っ て ホコ リ ま みれ に な つて いる アナ タ 。 マニ ュ ア ル を 10 ペ ー ジ ほど 読ん で 何 も し て いな い ア ナタ 。 
が 頭 ば か り の コン ピュ ー タ 知識 で と まつ て いる アナ タ 。 同じ ゲー ム ば か り し て いる アナ タ 。 
D 最初 は パソ コン に 夢中 だ っ だ は ず ……。 中 途 で 放り だ し て も つ だ いな いで す ネ ケ 
% к 一 度 JP I 2U— v А xU? 
Ф パソ コン が お も し ろ ぐ て 楽し い コ ンピュータ ライ フ と な る よう 、 あな だ の ペー ス に 合わ せ て 
2 自信 を つけ て さしあげ ます 。 
$ 
し 


ттш чер ЕЕ 


誰 に も 使え る 機種 か ら ハ イグ レー ド 機 種 ま で 

ハー ドウ ェ ア コ ー ナ ー 
ЖЕ 常に 国内 、 海 外 の 人 気 パソ コン や 周辺 関連 

(o 機器 を ピッ グ に 品 揃え て 展示 し て いま す 。 
! MSX 仕 様 か ら IBM-5550 ま で あな た の ニー ズ 
に 合っ た パソ コン が ご 自由 に お 選び いた だ け 


ます 。 
機種 選び の ご 相談 に も お 応え いた し ます 。 


優秀 ソフ ト が 機種 別に 5.000 種 の 


ソフ トウ ェ ア コ ー ナ ー 


国内 、 海 外 の ホビ ー か ら ビ ジネス まで 優秀 な 
最新 の ソフ ト が パソ コン の 機種 別に 5.000 点 = ' 
を 豊富 に 常備 し て いま す 。 

全国 どこ か ら で も お 選び いた だ け ま す 。 


初め て の 方 に 誰 れ で も 分 か りや すく 楽し い カリ 
キュ ラム で 各 パ ソコ ン 講 座 を 開設 し て いま す 。 
いつ で も 納得 の いく まで あな た の ペース で ご 
利用 で きま す 。 


X ё 店 教室 (03) 496-4148 
八王子 店 教室 (0426)26-4141 
町 ІН 店 教室 (0427)23-1313 
デ ワ ノラ ンド 教室 (06) 644-5566 
京都 寺 困 店 教室 (075)341-3573 
くず は 店 教室 (0720)56-8181 
四 日 教室 (0593)54-3366 
Ж 。 店 教室 (0592)26-0111 


全国 どこ か ら で も ご 利用 くだ さい 。 

(コン サル ティ ング 7 
ER Ы. қан 
олова 
EE 


万 全 の サポ ー ト 体制 で 全国 を ネッ ト す る パソ コン の 大 型 専門 店 8 チェ ー ン 。 
же ё Б FH EB 店 mg 八王子 店 TIVITY 


ORA GEGNIOAZIBOBNAR (T 150) 東京 都 町 田 市 森野 1 丁目 39-16(〒194) ЖИБЛЕЗФИЯИИЯЛЕЗ4227(710) ХИЛАЖАНЖІЯ5ТН6Ж78 (7556) 
(03)496-4141 т(0427)23-1313 т(0426)26-4141 т(06)644-1413 


2.8 メ ディ アラ ンド к= < ず は 店 х= FEPRE *『 京 都 寺町 店 


大 阪 市 浪速 区 日 364. 月 9 番 11 号 (〒556) 枚方 市 楠葉 並木 町 2 丁目 2 一 2(〒573) ЕФФЕТЕЖТП-324Е9/22/ғ(7595) REBTRE HIT OE T EA? IS C800) 
т7(06 


644-1613 71(0720)56-8181 т(06)834-4141 1:(075)341-3571 
sss JINE an B rb 5 sx 店 «sp Ж 店 
%5Ш7%5%2781-5 SAKAENOW6F (ТӨ)  mHIBUBMOS2-1-—I9(T510 3 市 A 2 内 31 一 20 (754) ЖАФЖАЖЫ-3-05%ЕФЕЛІР(Т0) 


) 
2(052)261-9201 2(0593)54-3366 2(0592)26-0111 2(0252)43-6671 


à 


- ジ ネイ Avi 


シー ジョシ に 気 を と れず に š 
話題 の 超 小型 入力 装置 マウ ス を 採用 し まし た 。 机 の 上 で 
нра 項 上 選択 や 、 線 ・ 色 ・ 形 の 


大 阪 市 周 倍 野 区 長池 町 22 番 22 号 (06) 
ャ ー プ 綿 国 内 産 機 営業 本 部 〒162 東京 


Oh dI 4 ロッ フト バン ク 発 行 Printed in Japan 定価 480 円 


